Состтавьте программу которая вводит с клавиатуры стороны треугольника и определяет является ли треугольник равносторонний

Question

Информатика

Дана

14 июля, 05:54

Состтавьте программу которая вводит с клавиатуры стороны треугольника и определяет является ли треугольник равносторонний

+1

Ответы (1)

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

Артюха · Answer 1

Program a;

var x, y, z:real;

begin

write ('Введите стороны->>') ;

read (x, y, z) ;

if (x=y) and (y=z) then

write ('Треугольник равносторонний') else

write ('Треугольник не равносторонний') ;

end.