Ответы
Ответ дал:
0
var a,b,c:integer;
begin
readln(a,b,c);
if (a+b+c=180) and ((a=90) or (b=90) or (c=90))
then writeln('Это углы прямоугольного треугольника')
else writeln('Это не углы прямоугольного треугольника');
end.
Помог ставь "Лучший ответ"
begin
readln(a,b,c);
if (a+b+c=180) and ((a=90) or (b=90) or (c=90))
then writeln('Это углы прямоугольного треугольника')
else writeln('Это не углы прямоугольного треугольника');
end.
Помог ставь "Лучший ответ"
Приложения:
Ответ дал:
0
а блок-схему нарисуешь ?
Ответ дал:
0
спасибо
Похожие вопросы
2 года назад
7 лет назад
10 лет назад
10 лет назад
10 лет назад
10 лет назад