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

来源:学生作业帮助网 编辑:作业帮 时间:2024/07/13 03:04:31
如何输入三个整数,将最大值放入MAX中,最小值放入MIN中用于PASCAL中
x){ީ/M~ںɎ';V= :O7=t {MuxcHtC?B(|ʊ'}\"}j 6 |;:Ɏs=ٮ Wt?~,LAQ~zQbBqq5X,Lgd&VfXe敤A$Z%%VF*)&gYE)ц:F 8VZ_H>t팧sVw$lk"ҬϷ,x ~7 Z"L+[C|#|`m6X&k_\g {.[

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

如何输入三个整数,将最大值放入MAX中,最小值放入MIN中用于PASCAL中
下面是源程序:
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]