Question

Что будет выведено на экран в результате выполнения следующих действий?
K:=0;
For A:=1 to 5 do
Begin
K:=K+A;
Write(K);
End.

Answer 1

Будут выведены суммы чисел 1+2+3+4+5 с накоплением, т.е. 1, 1+2, 1+2+3..
На выводе будут числа 1, 3, 6, 10, 15.