Рассмотрим данную программу.Var a, k : integer; // — обозначаются переменные.begin a := -2; // — переменной a изначально присваивается значение -2.for k := -5 to 1 do a := (-2) * a; // — цикл со счётчиком, операция (-2)*a повторяется 7 раз. (В промежутке от -5 до 1 расположено 7 целых чисел.)write (a); // — вывод переменной a.end.Для нахождения a, как видно из программы, нужно -2 умножить на a семь раз. Заметим, что после каждого нового раза переменная будет изменяться. Изначально она равна -2, значит, на первом этапе ей будет присвоено значение (-2) * (-2) = 4. На втором уже (-2) * 4 = -8, на третьем (-2) * (-8) = 16, и т.д. На последнем этапе, таким образом, a будет равняться 256.Ответ: 256.