Задача 3 var s, n:integer, begin s:=5; for n:=2 to 4 do s:=s+(n-1); writeln(s); end.

Пошаговое решение:

1. Инициализация переменной `s` значением 5.
2. Цикл `for n` выполняется для `n` от 2 до 4.
3. Итерация 1 (n=2): `s` становится `5 + (2-1) = 6`.
4. Итерация 2 (n=3): `s` становится `6 + (3-1) = 8`.
5. Итерация 3 (n=4): `s` становится `8 + (4-1) = 11`.
6. Вывод значения `s` на экран.

Ответ: 11