Задание на прикреплённой фотографии

k1 - один катетk2 -  другой катетg - гипотенузаs -  площадь треугольникаязык програмирования: паскаль.vark1, k2, g, s : real; beginreadln (k1); readln (k2); g : = sqrt(sqr(k1) + sqr(k2)); writeln(g); s : = (k1 * k2) / 2 ; writeln(s)end.

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

program;   var  i: byte;   str: string;   begin  for i: =60 to 70 do  begin  str: =str+chr(i) ;   end;   writeln(str);   end.

1)false (т.к. x> y)

2)true (x< y,x не равен y)

3)false(x> y)

4)true(т.к. x=y, x не равен y)