Question

Определите, что будет напечатано в результате работы следующей программы. (Каждый шаг алгоритма расписать, «как считали» и записать ответ).

Var s, k: integer;

Begin

s := 1;

for k := 1 to 4 do

s := s+2*k;

write (s);End.



​

Answer 1

Ответ:

21

Объяснение:

s = 1

зашли в цикл

k = 1 => s = 1 + 2*1 = 1+2 = 3

s = 3

k = 2 => s = 3 + 2*2 = 3 + 4 = 7

s = 7

k = 3 => 7 + 2*3 = 7 + 6 = 13

s = 13

k = 4

s = 13 + 2*4 = 13 + 8 = 21

s = 21

вышли из цикла