@Nterwy
Почему на аватарке я робот ??

Что означает строка min := i?

Что означает строка min := i?
program choiсesort;
var mas: array[1..5] of integer; j, i, min, obmen, gen: integer;
begin
  randomize;
  for gen:=1 to 5 do mas[gen]:=random(1, 10);
  writeln(mas);
  
  for i:=1 to 4 do begin
    min := i; {<----- почему мы присваиваем минимуму значение i ?}
    
    for j:=i to 5 do if mas[j] < mas[min] then min:=j;
    
    if min <> i then begin
      obmen := mas[i];
      mas[i]:=mas[min];
      mas[min]:=obmen;
      writeln(mas);
    end;
  end; 
end.
  • Вопрос задан
  • 220 просмотров
Пригласить эксперта
Ответы на вопрос 2
SagePtr
@SagePtr
Еда - это святое
Комментировать
HemulGM
@HemulGM
Delphi Developer, сис. админ
Это чей-то код. Что он этим хотел сделать и как он работает никто не знает. Просто шаги читай один за другим и пробуй разобраться.
Ответ написан
Комментировать
Ваш ответ на вопрос

Войдите, чтобы написать ответ

Войти через центр авторизации
Похожие вопросы