У меня проблема: нужно поменять минимальный и максимальный элементы одномерной таблицы местами. Я нашел эти элементы, их номера. Для удобства вывел первоначальную таблицу (задавал случайными числами), эти минимум, максимум, их номера (у мах - z, у мин - к). Дальше:  
 
Вот тот кусок кода, где, наверно, есть ошибка:

for i:=1 to 10 do
 begin
   if A[i]=min then A[i]:=A[z];
   if A[i]=max then A[i]:=A[k];
 write (A[i]:5);
end;

вместо того, чтоб их менять, компьютер ставит 2 минимальных, то есть один заменяет, второй - нет. В чем проблема? Помогите, пожалуйста.

Примерчик:

Благодарю. Все получилось.
И еще вопрос: а как быть с двумерной таблицей?
Ведь там не напишешь:
max:=1,1;
min:=1,1;
?

Это сообщение отредактировал(а) Metalex - 10.11.2008, 14:36

Все, я разобрался: теперь вместо 2-х величин там будет 4.