Дорожные знаки называют - международным языком улицы! гос.стандартом определены 4 группы дорожных знаков - предупреждающие, запрещающие, предписывающие и указательные!)
Вот. На фото все видно.
В 3-м примере мы прибавляем тех кто умеет играть только в шашки и только в шахматы и тех, кто играет в шашки и шахматы одновременно
Var n,k,m: integer;
<span>begin
</span><span> write('n = '); readln(n);
</span><span> k:=n; m:=1;
</span><span> while k>0 do
</span><span> begin
</span><span> k:=k div 10;
</span><span> m:=m*10;
</span><span> end;
</span><span> k:=2*m*10+n*10+2;
</span><span> writeln(k);
</span><span>end.
</span>n = 78954
<span>2789542
</span>
<span>
</span>
Program task1;
var a, b, c, p, s :real;
begin
readln(a,b,c); if (a + b > c) and (a + c > b) and (b + c > a) then begin writeln('Могут быть сторонами треугольника'); p:= (a + b + c)/2; s:= sqrt( p * (p - a) * (p - b) * (p - c) ); writeln('Площадь равна ',s); end else writeln('Не могут быть сторонами треугольника');
<span>end.
program task2;
var a, b, c :real; d :integer;
begin
write('Введите числа: '); readln(a,b); write('Введите номер действия: '); readln(d); case d of 1: c:= a + b; 2: c:= a - b; 3: c:= a * b; 4: c:= a / b; end; writeln(c);
<span>end.</span></span>
В квадрате 3х2 движение змейкой по вертикале, для того, что бы оказаться на противоположенном конце, как для строк, так и для столбцов их количество должно быть нечетным. Таким образом метод змейки для поля 16х16 не подходит. Более того, с соблюдением условия побывать во всех клетках по 1 разу в поле16х16 задание является невыполнимым. Ответ 0 (ноль). Для его выполнения хотя бы одна сторона должна быть нечетной.