Регистрация
АнастасияГушпет
04.02.2020 18:27
Информатика
Есть ответ 👍

Нужно сделать это и скинуть фото, из-за того что что муторно

239
247
Посмотреть ответы 1

Ответы на вопрос:

kostja07
kostja07
4,7(64 оценок)
Var a,b,c: integer; begin writeln('введите 3 числа, последняя должна быть введена гипотенуза'); read(a,b,c); if (a=0) and (b=0) and (c=0) then writeln('треугольника не существует') else if (a< =b+c) or (b< =a+c) or (c< =a+b) and  (sqr(c) = sqr(a) + sqr(b)) then writeln('да могут быть сторонами треугольника') else writeln('нет не могут'); end.

Популярно: Информатика