Що буде результатом
1 балл
виконання даного алгоритму?
повторити з
поворот с 2 градусів
Поворот проти годинникової
стрілки на 6 градусів
Переміщення на 6 кроків
Поворот за годинниковою
стрілкою на 6 градусів

т.д.

var i: integer; begin  for i: = 2 to 14 do      writeln(i*i); end.

var a,b,c,d: real;

begin

    read(a,b,c,d);

    if ((a< c) and (b< d)) or ((b< c) and (a< d)) then

        writeln('впишется')

    else writeln('не впишется');

end.

var a,b,c: real;

begin

    read(a,b,c);

    if (a> b) and (a> c) then a: = b*c;

    if (b> a) and (b> c) then a: = a*c;

    if (c> b) and (c> a) then a: = b*a;

    writeln(a);

end.

3)var x,y,z,u: real; function max(x,y,z: real): real; begin  if (x> =y) and (x> =z) then max: = x;   if (y> =x) and (y> =z) then max: = y;   if (z> =y) and (z> =x) then max: = z; end; function min(x,y,z: real): real; begin  if (x< =y) and (x< =z) then min: = x;   if (y< =x) and (y< =z) then min: = y;   if (z< =y) and (z< =x) then min: = z; end; begin      read(x,y,z);       u: =(max(x,y,z)*max(x,y,z)-exp(x*ln(/(sin(2*x)+max(x,y,z)/min(x,y,z));       writeln(u); end.

program primer_(число); var (буквы): real или integer;   beginwriteln ('введите что-то'); read (буква); буква: =вычисления; write ('значение выражения=',   буква); end.

p.s. только смотри на знаки, которые я расставила.