Определи значение переменной k после выполнения фрагмента программы: k := 1; for i := 1 to 5 do begin k := k + 3 * i; end;

Рассмотрим данный фрагмент программы по шагам и вычислим конечное значение переменной k.

Исходное значение переменной:

k := 1;

Значения переменной i меняются в цикле from 1 to 5, то есть i принимает значения: 1, 2, 3, 4, 5.

На каждом шаге в цикле происходит следующая операция:

k := k + 3 * i;

Обозначим поэтапно вычисления:

Перед началом цикла:

• k = 1

Шаг 1 (i = 1):

• k = 1 + 3 * 1 = 1 + 3 = 4

Шаг 2 (i = 2):

• k = 4 + 3 * 2 = 4 + 6 = 10

Шаг 3 (i = 3):

• k = 10 + 3 * 3 = 10 + 9 = 19

Шаг 4 (i = 4):

• k = 19 + 3 * 4 = 19 + 12 = 31

Шаг 5 (i = 5):

• k = 31 + 3 * 5 = 31 + 15 = 46

Ответ: после завершения цикла значение переменной k равно 46.

Если есть дополнительные вопросы или нужны объяснения по какому-либо шагу — спрашивайте!