Question

Написать текст программы заполнения одномерного числового массива случайными числами и вывода элементов на экран с индексами.

Answer 1

В PascalABC.NET есть много что готового. В частности, используя новые возможности, можно записать всё одной (вернее, двумя) строчками:

Код (PascalABC.NET):

##

ArrRandomInteger.Select((val, ind) -> Format('a[{0}] = {1}', ind, val)).Print(NewLine)

Пример вывода:

a[0] = 83

a[1] = 6

a[2] = 58

a[3] = 61

a[4] = 64

a[5] = 49

a[6] = 59

a[7] = 9

a[8] = 83

a[9] = 75

Более традиционный (в стиле "старого Паскаля") подход можно реализовать, например, так:

Код (PascalABC.NET):

var

 a: array[1..10] of integer;

 i: integer;

begin

 for i := 1 to 10 do

 begin

   a[i] := random(101);

   writeln('a[', i, '] = ', a[i]);

 end;

end.

Пример вывода:

a[1] = 7

a[2] = 21

a[3] = 15

a[4] = 78

a[5] = 91

a[6] = 72

a[7] = 63

a[8] = 56

a[9] = 38

a[10] = 81

Answer 2

Конечно, вот пример программы на языке Python, который создает одномерный числовой массив случайных чисел и выводит его элементы на экран с индексами:

pythonCopy code
import random

# Задаем размер массива
размер_массива = 10

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

# Заполняем массив случайными числами
for i in range(размер_массива):
    случайное_число = random.randint(1, 100)  # Можно изменить диапазон случайных чисел по вашему усмотрению
    массив.append(случайное_число)

# Выводим элементы массива на экран с индексами
for индекс, элемент in enumerate(массив):
    print(f"Индекс {индекс}: Значение {элемент}")

Вы можете изменить значение размер_массива и диапазон случайных чисел, чтобы настроить программу под ваши нужды.