2 одномерных массива

[dagggggger]

в произвольно заданных двух одномерных массивах определить максимальные элеметы и поменять их местами

[Mad_Cat]

i1:=1;
for i:=2 to n do
if a[i]>a[i1] then i1:=i;
i2:=1;
for i:=2 to m do
if a[i]>a[i2] then i2:=i;
t:=a[i1];a[i1]:=a[i2];a[i2]:=t;

[dagggggger]

спасибо)) вот только ты бы не мог объявить переменные, а то не могу разобраться