作业帮 > 综合 > 作业

从文件中读取两个整数,输出两个数中较大的一个的平方值.pascal语言编程

来源:学生作业帮 编辑:搜狗做题网作业帮 分类:综合作业 时间:2024/05/16 01:54:09
从文件中读取两个整数,输出两个数中较大的一个的平方值.pascal语言编程
从文件中读取两个整数,输出两个数中较大的一个的平方值.pascal语言编程
楼主你好!
这很简单哦.
var
a,b,x : longint;
function max(a,b:longint):longint;
begin
if a > b then exit(a);
exit(b);
end;
begin
assign(input,'file.in');
assign(output,'file.out');
reset(input);
rewrite(output);
readln(a,b);
x := max(a,b); //找到最大数
writeln(sqr(x)): //输出平方
close(input);
close(output);
end.
望采纳,谢谢.