Question

Определите, что будет напечатано в результате выполнения следующей программы:

var x, s, k: integer;
begin s:=0;
x:=-100;
k:=0;
while k < 25 do begin
X:=x+8;
S:=s+x;
k:=k+1
end;
writeln(s);
end.​

Answer 1

Ответ:

100

Объяснение:

Изначально k = 0. Пока k меньше 25:

К x прибавляем 8 (было -100, стало -92), к s прибавляем x (было 0, стало -92), к k прибавляем 1 (было 0, стало 1).

Т.к. k всё ещё меньше 25 делаем тоже самое. К x прибавляем 8 (было -92, стало -84), к s прибавляем x (было -92, стало -176), к k прибавляем 1 ( было 1, стало 2) и т.д.

Основная проверка, как я понял, на то, знаете ли вы, что Pascal не чувствителен к регистру (т.е. не имеет значение, с заглавной буквы переменная иль с маленькой).