Предмет: Другие предметы,
автор: rubalovadiana
Даны вещественные положительные числа a, b, c. Выяснить, существует ли треугольник со сторонами a, b, c. Условие существования: сумма двух любых сторон больше третьей стороны.
с if
rubalovadiana:
pascal
begin
writeln('Введи стороны треугольника:');
readln(a,b,c);
if (a+b>c) and (a+c>b) and (b+c>a)and then
writeln('Существует')
else writeln('Не существует');
end.
Ответы
Автор ответа:
1
program chaynick
var a, b, c: real;
begin
writeln ('существует ли треугольник со сторонами а,b,c. Введите а');
readln (a);
write ('Введите b');
readln (b);
write ('Введите с');
readln (с);
if a+b>c and a+c>b and b+c>a then
writeln ('Существует')
else
writeln ('Не существует')
end.
var a, b, c: real;
begin
writeln ('существует ли треугольник со сторонами а,b,c. Введите а');
readln (a);
write ('Введите b');
readln (b);
write ('Введите с');
readln (с);
if a+b>c and a+c>b and b+c>a then
writeln ('Существует')
else
writeln ('Не существует')
end.
Похожие вопросы
Предмет: Физика,
автор: Kssseeniia1555
Предмет: Математика,
автор: ermakliza26
Предмет: Математика,
автор: ssamoylov761
Предмет: Алгебра,
автор: zuskindaniil23
Предмет: Другие предметы,
автор: kamikadze2000