Даны положительные действительные числа x,y,z. Выяснить существует ли треугольник с длинами сторон x,y,z.
Составьте, пожалуйста, программу в Паскаль
Ответы
Ответ дал:
0
// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
var (x,y,z):=ReadReal3('Введите через пробел три числа:');
if (x+y>z) and (x+z>y) and (y+z>x) then Writeln('Треугольник существует')
else Writeln('Треугольник не существует')
end.
Примеры
Введите через пробел три числа: 2.34 5.18 9
Треугольник не существует
Введите через пробел три числа: 3 4 5
Треугольник существует
// Внимание! Если программа не работает, обновите версию!
begin
var (x,y,z):=ReadReal3('Введите через пробел три числа:');
if (x+y>z) and (x+z>y) and (y+z>x) then Writeln('Треугольник существует')
else Writeln('Треугольник не существует')
end.
Примеры
Введите через пробел три числа: 2.34 5.18 9
Треугольник не существует
Введите через пробел три числа: 3 4 5
Треугольник существует
Ответ дал:
0
Спасибо большое!
Вас заинтересует
2 года назад
2 года назад
3 года назад
9 лет назад
9 лет назад