Составьте программку , которая наполняет массив А[1..8] случайными целыми числами в

Для составления этой программки нам пригодится сам массив. Так как состоит он только из целых чисел, конкретно таковой тип у него и будет:
var A:array [1..8] of integer;
Чтоб его элементы были случайными, нам нужно использовать специальную функцию. Но в задачке есть спектр, потому мы немножко изменим эту функцию:
for i:integer:1 to 8 do
A[I] rand(10) + 10; - этой записью мы изменили работу функции. Сейчас она будет творить числа от нуля до 10, а мы к ним будем добавлять еще 10, потому они не будут больше 20 и меньше 10.
for i:integer:1 to 8 do
if (A[i] lt; 15) then
A[I] A[i] * 2;
Выводим:
for i:integer:1 to 8 do
write (A[I]:5);