Задача1. Написать алгоритм для определения вида треугольника (остроугольный,...

Question

Задача1. Написать алгоритм для определения вида треугольника (остроугольный, прямоугольный, тупоугольный), если даны величины двух его углов А и В в градусах. Задача 2. Ракета запускается с точки на экваторе Земли со скоростью V(км/с) в направлении движения Земли по орбите вокруг Солнца. Каким будет результат запуска ракеты в зависимости от скорости V? V< 7.8 Ракета упадет на Землю 7.8 ≤ V 16.4 Ракета покинет пределы Солнечной системы Умоляю,помогите,не знаю как делать:(((

Answer 1

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 ('ракета упадет на Землю');</p>

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

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

end.