谁能帮我解Free Pascal 给出圆的面积,求圆的半径输入一个实数s,表示圆的面积,保留两位小数输出一个实数r,表示圆的半径我是在输入那里不会保留两位小数

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/14 06:25:53

谁能帮我解Free Pascal 给出圆的面积,求圆的半径输入一个实数s,表示圆的面积,保留两位小数输出一个实数r,表示圆的半径我是在输入那里不会保留两位小数
谁能帮我解Free Pascal
给出圆的面积,求圆的半径
输入一个实数s,表示圆的面积,保留两位小数
输出一个实数r,表示圆的半径
我是在输入那里不会保留两位小数

谁能帮我解Free Pascal 给出圆的面积,求圆的半径输入一个实数s,表示圆的面积,保留两位小数输出一个实数r,表示圆的半径我是在输入那里不会保留两位小数
program yuan;
var
r:real;
begin
readln(r);
write(3.14*r*r:0:2);//圆的面积公式
end.
望采纳