Программирование.
Напишите программу в Turbo Pascal.

1)

var 

a,b,c: real;

begin

readln(a,b);

c: =180-a-b;

if (a> 90) or (b> 90) or (c> 90) then writeln('тупоугольный')

else

if  (a=90) or (b=90) or (c=90) then writeln('прямоугольный')

else  writeln('остроугольный');

end.

2)

var

v: real;

begin

readln(v);

if v< 7.8 then writeln ('ракета упадет на землю');

if v=7.8 then  writeln ('ракета станет спутником земли');

if (v> 7.8) and (v< =16.4) then  writeln ('ракета останется в пределах солнечной системы'); if (v> 16.4) then  writeln ('ракета покинет пределы солнечной системы');  

end.

думаю так1) налить в кувшин 3 л, перелить в емкость,где будет 7 л

2) еще раз налить туда 3 л

3) налить 3 л воды налить в кувшин для 8 л, потом еще раз для 8 литров и еще раз(3 раза) на третьем разе останется 1 л,этот л и доливаем в кувшин с 7 л 

не знаю в каком виде это должно быть

1 ввод возрастов

2 если s> m то пишем "саша старше маши "

3 иначе если s=m то пишем "саша и маша ровестники"

4 иначе пишем "маша старше саши"

в первом нет строчки 3

последнее будет неверно тк получается что для всех 99-и оно работает, а для себя- нет что противоречит условию именно поэтому девяносто девятое будет верно