输入四个不同的数据，输出四个数中的最大值，用pascal编出来。

原问题：输入四个不同的数据，输出四个数中的最大值，用pascal编出来。
分类：编程开发 > 最后更新时间：【2016-12-12 19:05:12】

最佳答案

var
i,a,max:integer;
begin
read(a); //先读入一个数
max:=a;
for i:=1 to 3 do //读入其它3个数并判断
begin
read(a);
if a > max then
max:=a;
end;
writeln(max);
end.

最佳答案由网友  whoami1978  提供
公告： 为响应国家净网行动，部分内容已经删除，感谢网友理解。
10

分享到：

其他回答

暂无其它回答!

    推荐