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.
Чтобы применить фильтр на основе значений полей, снимите флажки рядом со значениями, для которых не нужно применять фильтр, а затем нажмите кнопку ОК.
Чтобы отфильтровать один или несколько значений из длинного списка, сначала снимите флажок (выделить все) , а затем выберите нужные значения.
Чтобы отфильтровать значения NULL (значение NULL указывает на отсутствие данных) в тексте, числе и полях даты: в списке флажков снимите флажок (выделить все) , а затем установите флажок рядом с надписью (пустые).
Чтобы применить общий фильтр, наведите указатель на пункт текст (или число или Дата) и выберите нужный фильтр. Фильтры, такие как " равно " и " между " и "запрашивать", чтобы ввести необходимые значения.
