Паскаль. Создать программу которая высчитывает площадь круга; радиус вводится пользователем. Программа завершается когда r <0

Кароч вот порога на нахождение радиуса
program z1;
var r:integer;
var s:real;
begin
read(r);
s:=3.14×(sqr(r);
write (s);
end

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку