Var s, k: integer; begin s := 1; for k := 2 to 7 do s := s + 100; write (s); end....

Question

Var s, k: integer;
begin
s := 1;
for k := 2 to 7 do
s := s + 100;
write (s);
end.
Поясните как решить

Answer 1

Ну если ты имел ввиду как ручным способом получить что выведет программа то я обычно черчу табличку 

в данном случае с 3 колонками 
В первой номер выполнения (чтобы не сбиться)
Во второй сама переменная (s)
И в третьей цикл (к)

---

Comments

и тут видим что программа выведет 601