Определите значение переменной S после выполнения следующих операторов: S:=0; k:=6; While...

Question

Определите значение переменной S после выполнения следующих операторов:

S:=0; k:=6; While k>3 do k:=k - 1; S:=S + k;

Answer 1

Program kl;var s,k: integer;begin   S:=0; k:=6; While k>3 do k:=k - 1; S:=S + k; write (s);
end.

Ответ: 3.