Предмет: Информатика,
автор: Aptemc900
Треугольник задан длинами сторон А, В, С. Написать программу, определяющую, существует ли данный треугольник. Для решения этой задачи использовать сложные логические условия. Программа должна иметь дружественный интерфейс. Протес-тировать программу для следующих исходных данных:
а) A=3, B=4, C=5
б) A=1, B=1, C=1
в) A=0, B=4, C=5
г) A=-3, B=6, C=5
д) A=2, B=1, C=8
Ответы
Автор ответа:
0
program a_1;
var A,B,C:integer;
begin
writeln('Введите стороны треугольника');
readln(A,B,C);
if (A+B>C) and (A+C>B) and (C+B>A)
then
begin
writeln('Треугольник существует');
writeln;
end
else
writeln('Треугольник не существует');
writeln;
end.
var A,B,C:integer;
begin
writeln('Введите стороны треугольника');
readln(A,B,C);
if (A+B>C) and (A+C>B) and (C+B>A)
then
begin
writeln('Треугольник существует');
writeln;
end
else
writeln('Треугольник не существует');
writeln;
end.
Похожие вопросы
Предмет: Математика,
автор: mariyka329
Предмет: Физика,
автор: madamborbolina11
Предмет: Информатика,
автор: mylittlepogchamp
Предмет: Физика,
автор: inna1781