自己写的free pascal程序,大家看看有没有语法错误.我怎么试运行不行啊!球形的计算公式软件.
来源:学生作业帮 编辑:搜搜考试网作业帮 分类:综合作业 时间:2024/06/28 19:48:31
自己写的free pascal程序,大家看看有没有语法错误.我怎么试运行不行啊!球形的计算公式软件.
Program ex1;
Var R,S,V:Real;
Begin
Writeln(R);
Readln(R);
Write(pi:0:2);
V:4/3*pi*R*R*R;
S:4*pi*R*R;
Writeln('V',V)
Writeln('S',S')
End.
顺便问个问题,怎样才能让结果停留在屏幕上?
Program ex1;
Var R,S,V:Real;
Begin
Writeln(R);
Readln(R);
Write(pi:0:2);
V:4/3*pi*R*R*R;
S:4*pi*R*R;
Writeln('V',V)
Writeln('S',S')
End.
顺便问个问题,怎样才能让结果停留在屏幕上?
![自己写的free pascal程序,大家看看有没有语法错误.我怎么试运行不行啊!球形的计算公式软件.](/uploads/image/z/16004273-41-3.jpg?t=%E8%87%AA%E5%B7%B1%E5%86%99%E7%9A%84free+pascal%E7%A8%8B%E5%BA%8F%2C%E5%A4%A7%E5%AE%B6%E7%9C%8B%E7%9C%8B%E6%9C%89%E6%B2%A1%E6%9C%89%E8%AF%AD%E6%B3%95%E9%94%99%E8%AF%AF.%E6%88%91%E6%80%8E%E4%B9%88%E8%AF%95%E8%BF%90%E8%A1%8C%E4%B8%8D%E8%A1%8C%E5%95%8A%21%E7%90%83%E5%BD%A2%E7%9A%84%E8%AE%A1%E7%AE%97%E5%85%AC%E5%BC%8F%E8%BD%AF%E4%BB%B6.)
Program ex1;
Var R, S, V:Real;
Begin
Writeln('R');
Readln(R);
read(pi:0:2);
V:4/3*pi*R*R*R;
S:4*pi*R*R;
Writeln('V', V)
Writeln('S', S')
readln
End.
Var R, S, V:Real;
Begin
Writeln('R');
Readln(R);
read(pi:0:2);
V:4/3*pi*R*R*R;
S:4*pi*R*R;
Writeln('V', V)
Writeln('S', S')
readln
End.