230问答网 > 输入三个数，计算并输出他们的平均值以及他们的乘积，写出程序（我用的是Free Pascal IDE）

输入三个数，计算并输出他们的平均值以及他们的乘积，写出程序（我用的是Free Pascal IDE）

如题

2024-12-25 13:40:53

推荐回答（3个）

回答1：

VAR
A,B,C,CHENGJI:LONGINT;
PINGJUN:DOUBLE;
BEGIN
READLN(A,B,C);
PINGJUN:=(A+B+C)/3;
CHENGJI:=A*B*C;
WRITELN(PINGJUN:0:0);
WRITELN(CHENGJI);
END.
我表示没编译，直接在对话框里打的，应该没问题吧。。。

回答2：

RPOGRAM A;
var
a,b,c,d:integer;
f:real;
begin
read（a,b,c）;
d:=a*b*c;
f:=(a+b+c)/3;
writeln(f);
writeln(d);
end.

回答3：

S 8 H