Question

Составьте программу, которая заполняет массив а[1..10] случайными целыми числами в диапозоне от 1 до 10, затем меняет местами первый элемент со вторым, третий с четвертым и тд. Выведите на экран исходный и полученный массивы.

Answer 1

// PascalABC.NET 3.2, сборка 1345 от 24.11.2016
// Внимание! Если программа не работает, обновите её версию!
begin
  var a:=ArrRandom(10,1,10); a.Println;
  var i:=0;
  while i<=9 do begin
    Swap(a[i],a[i+1]);
    i+=2
    end;
  a.Println
end.

Пример
5 1 7 3 6 3 9 1 3 8
1 5 3 7 3 6 1 9 8 3

Answer 2

Программа для заполнения и перестановки элементов массива

Вот пример программы на языке Python, которая заполняет массив `a` случайными целыми числами в диапазоне от 1 до 10, а затем меняет местами элементы массива:

import random

# Создаем пустой массив
a = []

# Заполняем массив случайными целыми числами от 1 до 10
for _ in range(10):
    a.append(random.randint(1, 10))

# Выводим исходный массив
print("Исходный массив:")
print(a)

# Меняем местами элементы массива
for i in range(0, len(a)-1, 2):
    a[i], a[i+1] = a[i+1], a[i]

# Выводим полученный массив
print("Полученный массив:")
print(a)

Объяснение программы: 1. Мы используем модуль `random` для генерации случайных чисел. 2. Создаем пустой массив `a`. 3. Используя цикл `for`, заполняем массив `a` случайными целыми числами от 1 до 10 с помощью функции `random.randint(1, 10)`. 4. Выводим исходный массив на экран. 5. Используя цикл `for`, меняем местами элементы массива `a` попарно. Мы используем индекс `i` для доступа к элементу `a[i]` и `a[i+1]`, и с помощью операции присваивания `a[i], a[i+1] = a[i+1], a[i]` меняем их местами. 6. Выводим полученный массив на экран.

Пример вывода: ``` Исходный массив: [7, 2, 9, 5, 10, 4, 3, 8, 6, 1] Полученный массив: [2, 7, 5, 9, 4, 10, 8, 3, 1, 6] ```

Надеюсь, это поможет! Если у вас есть еще вопросы, не стесняйтесь задавать.