Var s,k: integer; Begin s := 3; for k:= 2 to 6 do S:= 5 + 5; writeln(s); End. Помоги мне пожалуйста

Вопрос школьника по предмету Информатика

Var s,k: integer;
Begin
s := 3;
for k:= 2 to 6 do
S:= 5 + 5;
writeln(s);
End.
Помоги мне пожалуйста

Ответ учителя по предмету Информатика

Ответ:

S= 28

Объяснение:

Цикл идёт от 2 до 6. Следовательно:

1. 2: S=3+5=8
2. 3: S=8+5=13
3. 4: S=13+5=18
4. 5: S=18+5=23
5. 6: S=23+5=28

(6 включительно в этом цикле)