Написать программу в Pascal. Даны два угла треугольника (в градусах). Определить, существует ли такой треугольник.
Если да, то будет ли он прямоугольным.
Знаешь ответ?
Чтобы оставить ответ, войдите или зарегистрируйтесь.
Ответ или решение 1
Сарви
program tryangle;
var a1, a2: real;
begin
writeln('Введите величины двух углов треугольника через пробел (в градусах)');
readln(a1, a2);
if ((a1 + a2) < 180) and (a1 > 0) and (a2 > 0)
then writeln('Треугольник с указанными углами существует.')
else
writeln('Треугольник с указанными углами не существует');
if (a1 + a2 = 90) and (a1 > 0) and (a2 > 0)
then writeln('Этот треугольник будет прямоугольным.')
end.
Новые вопросы в разделе Информатика
Адинела
05.10.2022, 08:15
Гаязутдин
05.10.2022, 01:10
Алайбек
05.10.2022, 01:05
Акияма
05.10.2022, 01:00
