задача на паскале.

проверить является ли четырёхугольник со сторонами a, b, c, d ромбом.

Question

Федотья

5 января, 14:44

+5

Ответы (1)

Знаете ответ на вопрос?

Юреня · Answer 1

Var a, b, c, d : real;

begin

read (a, b, c, d) ;

if (a=b) and (b=c) and (c=d) then write ('Ромб') else write ('Не ромб') ;

end.

задача на паскале.проверить является ли четырёхугольник со сторонами a, b, c, d ромбом.