Даю 30 БАЛЛОВ , срочно , помогите!!!!!!!
около школы разбили клумбу в форме Круга радиусом R м.На 1 м квадратный площади требуется x граммов семян цветов .Сколько граммов семян нужно купить?Площадь круга вычисляется по формуле S=π*R квадрат . В качестве π используйте функцию pi. Значения переменных R, x ввести с клавиатуры
помогите , плиз , буду благодарна )
Answers & Comments
Вот держи.Для меня число π=3.1415926.P.S Можешь потом на своё поставить!
var
R,x,c,f:real;
pi:real;
begin
write('Введите x семян на 1 кв.м:');
readln(x);
write('Введите S:');
readln(R);
pi:=3.1415926;
c:=pi*R;
f:=c*x;
writeln('Площадь клумбы равна:',c);
writeln('Кол-во семян для покупки:',f);
end.