Запишите значение переменной Var s,k: iuneger Begin s:=0 for k:=3 to 8 do s: = s+9 writeln(s) End
Представим, что количество циклов - x. x=8-3+1=6 циклов. Значит к переменной s число 9 будет добавлено 6 раз, значит s=6*9=54. Соответственно в конце программы k будет равным 8, и s будет равным 54.