Определи способ заполнения массива. for i := 1 to 4 do read(a[i]); 1 с помощью оператора присваивания (по формуле) 2 ввод каждого значения с клавиатуры 3 с помощью оператора присваивания (случайными числами)
2,с помощью оператора присваивания
не ,с клавиатура,ошибся