Составить программу на Pascal ABC.

Задача:

Даны 3 стороны Треугольника a, b, c. Является ли треугольник равностороним? Является ли треугольник равнобедреным.

Программу написать можно ли одну большую либо 2 маленькие (маленькие отвечающий на каждый вопрос задачи)

Question

Информатика

Руся

24 января, 17:15

Составить программу на Pascal ABC.

Задача:

Даны 3 стороны Треугольника a, b, c. Является ли треугольник равностороним? Является ли треугольник равнобедреным.

Программу написать можно ли одну большую либо 2 маленькие (маленькие отвечающий на каждый вопрос задачи)

+2

Ответы (1)

Знаешь ответ?

Аполлинарий · Answer 1

Var a, b, c : integer;

begin

readln (a, b, c);

if (a = b) and (a=c) then writeln ('Треугольник равносторонний');

if ((a=b) and (ac)) or (b = c) and (ba) then writeln ('Треуголник равнобедренный')

end.