напишите программы в паскаль:
1) Используя генератор случайных чисел, заполнить массив размерностью 8 элементов числами из интервала [-10,+50]. Вывести список элементов массива
2) Заполнить массив размерностью 4 с клавиатуры целыми числами . Вывести список элементов массива
3) Заполнить массив размерностью 18 Ввод с формулы А(i)=i*i+4 . Вывести список элементов массива
#1
begin
ArrRandom(8, -10, 50).Println;
end.
#2
begin
var A := ReadArrInteger(4);
A.Println;
end.
#3
begin
var A := SeqGen(19, p-> p*p + 4);
A.Println;
end.
Объяснение: