Выбери программу, которая вычисляет длину гипотенузы.

var
n, z,p:real;
begin
writeln('Введи длины катетов n и z ');
readln(n, z);
p:=n*n+z*z;
writeln('p=',c:8:2);
readln;
end.
var
n, z,p:real;
begin
writeln('Введи длины катетов n и z ');
readln(n, z);
p:=sqr(sqrt(n)+sqrt(z));
writeln('p=',c:8:2);
readln;
end.
var
n, z,p:real;
begin
writeln('Введи длины катетов n и z ');
readln(n, z);
p:=sqrt(sqr(n)+sqr(z));
writeln('p=',p:8:2);
readln;
end.

1. делим a и b на 33.

2. округляем вверх (до следующего целого)

3. перемножаем округлённые числа.

4. делим на n.

5. округляем вверх.

формулой: x = [([a/33]+1)*( [b/33]+1) / n]   + 1

где [y] - целая часть числа y. 

(1+1/sqr((12*x), если без игрика, а как игрик впихнуть не могу

1)

var a,b,c,d: real;

begin

  read(a,b);

  c: =(a+b)/2;

  d: =2*a*b;

  if a> b then begin

    a: =d;

    b: =c;

  end;

  if a< b then begin

  a: =c;

  b: =d;

  end;

  writeln(a,' ',b);

end.

2)

var a,b: integer;

begin

  read(a,b);

  if (a< 1) or (a> 31) then writeln(' день введен неправильно');

  if (b< 1) or (b> 12) then writeln(' месяц введен неправильно');

end.

3)

var a,b,c: real;

begin

  read(a,b,c);

  if (a> b)and(a> c)then writeln(a);  

    if (b> a)and(b> c)then writeln(b);

  if (c> b)and(c> a)then writeln(c);

end.

1.что можно делать в школе?

бегать, ходить,играть,учить,узнавать. и тд.

2. в школе есть:

книга, библиотека , стены,кабинеты, и тд.