Запишите значение переменной 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