Var s,k: integer;Begins := 3;for k:= 2 to 6 doS:= 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 включительно в этом цикле)