Задача на паскале.проверить является ли четырёхугольник со сторонами a, b, c, d ромбом.
Задача на паскале.
проверить является ли четырёхугольник со сторонами a, b, c, d ромбом.
Ответ(ы) на вопрос:
Program 1;
var a,b,c,d:real;
begin
writeln('введите стороны');
readln(a,b,c,d);
if (a=b) and (b=c) and (c=d) and (d=a) then writeln('Это ромб') else writeln('Это не ромб');
readln;
end.
Надеюсь на лучший ответ:)
Не нашли ответ?
Похожие вопросы