作业帮 > 综合 > 作业

如何输入三个整数,将最大值放入MAX中,最小值放入MIN中

来源:学生作业帮 编辑:百度作业网作业帮 分类:综合作业 时间:2024/05/01 17:40:57
如何输入三个整数,将最大值放入MAX中,最小值放入MIN中
用于PASCAL中
如何输入三个整数,将最大值放入MAX中,最小值放入MIN中
下面是源程序:
program ssy;
var
i,j,max,min,t:integer;
a:array[1..3] of integer;
begin
read(a[1],a[2],a[3]);//读入三个数存在数组a里
{将数组a中的元素从大到小排序}
for i:=1 to 2 do
for j:=i+1 to 3 do
if a[i]