Ответ:
- Объявление массива из 15 элементов:
var A: array[1..15] of integer; - Запись значения 8 в пятый элемент:
A[5] := 8; - Вывод всех элементов массива из 10 элементов:
for i := 1 to 10 do
write(A[i], ' ');
var A: array[1..15] of integer;A[5] := 8;for i := 1 to 10 do
write(A[i], ' ');