1.任意给定一个正实数,设计一个算法求以这个数为半径的园的面积
问题描述：
1.任意给定一个正实数,设计一个算法求以这个数为半径的园的面积
2.任意给定一个大于1的正整数n,设计一个算法求出n的所有因数
P.S:要完整算法过程~越完整的加高分
答
1.
read(r);
write(pi*r*r);
2.
read(n)
for a:=2 to n-1 do
if n mod a=0 then
write(a,' ');
pascal代码.mod表示取余数