Question

Определите, что будет напечатано в результате работы следующего фрагмента программы: var k, s:integer;

begin

s:=2;

k:=2;

while k < 50 do begin

s:=s+k;

k:=k+1;

end;

write(s);

end.
Если можно, напишите подробно.

Answer 1

Будет выведено число 1226.

Answer 2

Подробно можно? У меня не получается так.

Answer 3

Всё намного проще.

Answer 4

Вам необходимо просто ввести эту программу в Pascal ABC и посмотреть ответ.

Answer 5

Спасибо, но мне не нужен один ответ. Хочу разобраться, где я делаю ошибку, что у меня получается другая цифра.

Answer 6

Все, сама разобралась :-)