Периметр квадрата равен p. Найдите площадь квадрата
Периметр квадрата равен p. Найдите площадь квадрата
Гость
Ответ(ы) на вопрос:
Гостьvar a, p: real;
begin
write('Введите периметр квадрата: ');
readln(p);
a := p / 4;
a := a * a;
writeln('Площадь квадрата: ', a);
end.
Не нашли ответ?
Похожие вопросы