• помогите с заданием. "упорядочьте одномерный массив по возрастанию" нужно написать код программы в паскаль. желательно с объяснением! спасибо заранее

Ответы 4

  • program masiv;const N=10;var mas:array [1..10] of integer;i,j,r,o:integer;begin for o:=1 to N do mas[o]:=Random(30)+30; for i:=1 to N-1 do for j:=1 to N-i do if (mas[j]>mas[j+1]) then begin r:=mas[j+1]; mas[j+1]:=mas[j]; mas[j]:=r; end;Writeln(mas)end.
    • Автор:

      nemo75
    • 6 лет назад
    • 0
  • Если есть вопросы,то напиши.Или я могу видео урок скинуть на эту тему
  • Спасибо большое! А можешь обьяснить почему нужен random 30? И сможешь каждую сточку постепенно обьяснить? Буду очень благодарна!!!
    • Автор:

      yahirtvzb
    • 6 лет назад
    • 0
  • Ответ будет ниже,дабы читаемость кода повысить.
    • Автор:

      polo84
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years