Записать циклы для решения

Записать циклы для решения следующей задачи:
1. Ввод 112 элементов массива Вс клавиатуры. Параметром цикла является переменная h. Нумерация начинается с 1. ________________________________________ _______________________
2. Ввод 96 элементов массива Ав столбец. Параметром цикла является переменная h. Нумерация начинается с 1. ________________________________________ _______________________
3. Формирует массив Еиз162случайных чисел, принадлежащих промежутку [15;30]. Параметром цикла является переменная Х.Нумерация начинается с 1 ________________________________________ _______________________
4. Формирует массив Dиз179случайных чисел, принадлежащих промежутку [16;24]. Параметром цикла является переменная f. Нумерация начинается с 1 ________________________________________ _______________________
Анютка98 на форуме Сообщить модератору о нарушении

0

1. Pascal
   1 2 for h := 1 to 112 do     ReadLn(B[h]);

2. Pascal
   1 2 for h := 1 to 96 do     ReadLn(A[h]);

3. Pascal
   1 2 for x := 1 to 162 do     E[x] := Random(16) + 15;

4. Pascal
   1 2 for f := 1 to 179 do     D[f] := Random(9) + 16;

0

Сообщение от Анютка98 Анютка98 на форуме Сообщить модератору о нарушении

В точку попал.

0