Закодируй в виде ребуса слова: вазон, семья, ус, сова, вода

нарисуй газон, и поставь знак "г=в". получится вазон.

7я=семья.

нарисуй пуск от компьютера, и поставь запятые с двух сторон. будет пуск.

нарисуй совок, поставь две запятые после, и поставь "а". будет сова.

нарисуй пищевую соду, или спроси у мамы как она выглядит. поставь знак "с=в". будет вода.

1) var    a,b: integer; begin    write('введите 2 числа: ');     read(a,b);     if a> b          then              write('первое число больше второго')          else            write('второе число больше первого'); end.2)var      a,b: real; begin  write('введите координаты x точек: ');   read(a,b);   write('расстояние между точками = ', abs(a-b)); end.3)var    a,b: real; begin  write('введите значения катетов: ');   read(a,b); write('гипотенуза равна ', sqrt(sqr(a)+sqr(; end.

Var     i,su1,su2: integer; a: array[1..10] of integer;     input,output: text; begin    assign(input,'input.txt');     assign(output,'output.txt');   reset(input);     rewrite(output);   for i: =1 to 10 do         read(input,a[i]);   for i: =1 to 10 do      begin                if a[i]> 0                      then                           inc(su1,a[i])           else                        inc(su2,a[i]);           end;     writeln(output,'сумма положительных: ',su1);   write(output,'сумма отрицательных: ',su2); close(input); close(output); end.