pascal编程 输入n个整数,找出最大数所在的位置,并将它与第一个数对调

pascal编程 输入n个整数,找出最大数所在的位置,并将它与第一个数对调
输入n个整数,找出最大数所在的位置,并将它与第一个数对调
注意是用一位数组编的

egin
readln(n);
for i:=1 to n do read(a[i]);
k:=1;
for i:=1 to n-1 do
if a[k]
再问： 说明部分也写一下
再答： begin readln(n); {读入一共多少个数} for i:=1 to n do read(a[i]); {读入n个数} k:=1; {先默认第1个数最大} for i:=1 to n-1 do {把所有数扫描一遍} if a[k]