Var s,k: integer; Begin s := 100; for k := 2 to 7do s := s + 1; writeln(s); End.
Какую переменную найти надо?
s или k?
найти s
S =105 чего тут думать