Найдите сдесь ошибку и напишите в исправном виде учитель сказал что там ошибка есть var j,i,min,k,t: integer; a: array [1..100] of integer; begin a[1]: =5; a[2]: =4; a[3]: =7; a[4]: =2; a[5]: =9; a[6]: =6; for j: =1 to 6 do begin min: =a[j]; for i: =j to 6 do if min> a[i] then begin min: =a[i]; t: =i end; k: =a[j]; a[j]: =min ; a[t]: =k; write(j,')'); for i: =1 to 6 do write(a[i],'; '); writeln; end; end.

lilipute2017    3   16.07.2019 23:20    0