Question

запишите значение переменной Var s,k: iuneger
Begin
s:=0
for k:=3 to 8 do
s: = s+9 writeln(s)
End

Answer 1

Представим, что количество циклов - x.
x=8-3+1=6 циклов.
Значит к переменной s число 9 будет добавлено 6 раз, значит s=6*9=54.
Соответственно в конце программы k будет равным 8, и s будет равным 54.