Запишите значение переменной s , полученное в результате работы программы:

Var s,k: integer;
Begin
s:=k:=3 to 7 do s:=s+6;
Writeln(s);
End

Во-первых, судя по всему, код написан неверно, т.к. нет такой записи "s:=k:=3". Наверно, код должен выглядеть так:var  s, k: integer;begin  for k := 3 to 7 do s := s + 6;  Writeln(s);end.Во-вторых, при выполнении выше указанного кода s=30