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.
Поделитесь своими знаниями, ответьте на вопрос:
Отредактируйте содержимое так, чтобы каждая фраза и название соответствовало друг другу 4.9. склеивание и разрезание строк я не трус, но я боюсь! да нам, царям, молоко нужно выдавать за вредность! этот нехороший человек предаст нас при первой же опасности! бамбарбия! киргуду! шутка! шурик, это же не наш метод! восток – дело тонкое. утром деньги – вечером стулья, вечером деньги – ночью стулья… он, конечно, виноват, но он… не виноват… бриллиантовая рука иван васильевич меняет профессию джентльмены удачи двенадцать стульев белое солнце пустыни кавказская пленница операция ы и другие приключения шурика берегись автомобиля!
(Бриллиантовая рука)
Да нам, царям, молоко нужно выдавать за вредность!
(Иван Васильевич меняет профессию)
Этот нехороший человек предаст нас при первой же опасности!
(Джентльмены удачи)
Бамбарбия! Киргуду! Шутка!
(Кавказская пленница)
Шурик, это же не наш метод!
(Операция Ы и другие приключения Шурика)
Восток – дело тонкое.
Белое солнце пустыни
Утром деньги – вечером стулья, вечером деньги – ночью стулья…
(двенадцать стульев)
он, конечно, виноват, но он… не виноват…
(Берегись автомобиля!)