Ах да,важно решать на базе уровня 9 класса,тоесть только random,не надо лезть глубоко,решается только на цикле for и операторе random
1. Допишите недостающие строки в программе вместо многоточия.
program mas;
var
a: array [1..10] of integer;
i: integer;
begin
…
a[i]:=i;
…
writeln(a[i]);
end.
2. С датчика случайных чисел задайте массив из 8 вещественных чисел и найдите их произведение.
3. Дан массив из 7 целых чисел. Все элементы, меньшие 10, заменить на 0 и вывести полученный массив на экран.