Question

Срочно! Помогите пожалуйста! Нужно решение программы, нам завтра с утра сдавать.
Задан массив натуральных чисел из 10 элементов [1,8,6,0,10,2,4,1,1,10].
Написать программу, выполняющую последовательно следующие действия:
1. Введите массив (список) в программу.
2. Распечатать массив на экране (команда принт).
3. Распечатать срез элементов с 1 по 8 элемент включительно.
4. Вычислить сумму [1] и [8] элементов, используя индексы на данные элементы. Результат распечатайте на экран.
5. Измените элементы [1] и [8] в массиве на значение суммы, вычисленное в предыдущем задание (команда присваивание =).
6. Распечатайте массив на экране

программа паскаль (8 класс)

Answer 1

##

var a := |1, 8, 6, 0, 10, 2, 4, 1, 1, 10|; // 1.

a.Println; // 2.

a[:8].Println; // 3.

var s := a[0] + a[7];

Println(s); // 4.

(a[0], a[7]) := (s, s); // 5.

a.Print // 6.