Регистрация
Franni
23.09.2020 10:06
Информатика
Есть ответ 👍

Нужно delphi. проверить, может ли быть построен какой-либо треугольник по введенным длинам сторон a,b,c (проверить неравенства треугольника: a+b> c, a+c> b, b+c> a) и вывести в окне формы соответствующее сообщение.

101
101
Посмотреть ответы 2

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

marekatyan
marekatyan
4,5(28 оценок)
Vara,b,c: longint; beginread(a,b,c); if (a+b> c) and (a+c> b) and (c+b> a) then write('yes')                                    else write('no'); end.
hatidzemustafaeva
hatidzemustafaeva
4,7(68 оценок)
1кбайте =100 байт ,то есть 300байтов значит за 2 секунды передается один файл а 216 байтов =512секунд

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