Задание 1. Запишите: 1. Объявление массива из 15 целых чисел. 2. Запись значения 8 в пятый элемент массива a. 3. Вывод всех элементов массива a из 10 элементов.

1. Объявление массива:
   var a: array[1..15] of integer;
2. Запись значения 8 в пятый элемент:
   a[5] := 8;
3. Вывод первых 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], ' ');