Информатика, опубликовано 2018-08-22 23:49:20 by Гость
Написать программу для турбо паскаля. Условие: По 3 введеным сторонам треугольника определить является ли треугольник прямоугольным.
Ответ оставил Гость
PROGRAM TREUG;
var a,b,c: integer;
begin
writeln (Сторона 1=);
readln (a);
writeln (Сторона 2=);
readln (b);
writeln (Сторона 3=);
readln (c);
if ((a^2=b^2+c^2)or(b^2=a^2+c^2)or(c^2=a^2+b^2)) then
writeln (треугольник прямоугольный);
else writeln (треугольник не прямоугольный);
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на