В массиве из случайных чисел поменять попарно элементы массива - QBasic

Узнай цену своей работы

Формулировка задачи:

В массиве из случайных чисел поменять попарно элементы массива. Вот составил программу:
На выходе имеем:
Не получилось. Почему? И с оператором SWAP тоже не получилось.

Решение задачи: «В массиве из случайных чисел поменять попарно элементы массива»

textual
Листинг программы
CLS
DIM A(10)
FOR i = 1 TO 10
  A(i) = INT(RND * 50 – 5)
  PRINT A(i);
NEXT i
PRINT
i = 1
WHILE i < 10
  X = A(i)
  A(i) = A(i + 1)
  A(i + 1) = X
  i = i + 2
WEND
FOR I = 1 TO 10
  PRINT A(i);
NEXT i

Объяснение кода листинга программы

  1. Объявляется массив A(10) для хранения 10 случайных чисел.
  2. С помощью цикла FOR и генератора случайных чисел RND, в массив A(10) записываются 10 случайных чисел от 0 до 49.
  3. Выводится на экран содержимое массива A(10).
  4. Задается значение переменной i равное 1.
  5. С помощью цикла WHILE попарно меняются элементы массива A(10).
  6. Переменной X присваивается значение элемента массива A(i).
  7. Значение элемента массива A(i) меняется на значение элемента массива A(i+1).
  8. Значение элемента массива A(i+1) меняется на значение переменной X.
  9. Значение переменной i увеличивается на 2.
  10. Цикл WHILE повторяется до тех пор, пока значение переменной i меньше 10.
  11. С помощью цикла FOR и команды PRINT выводится на экран содержимое массива A(10).

Оцени полезность:

11   голосов , оценка 3.727 из 5
Похожие ответы