Question

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

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

Answer 1

Во-первых, судя по всему, код написан неверно, т.к. нет такой записи "s:=k:=3". Наверно, код должен выглядеть так:

var
  s, k: integer;

begin
  for k := 3 to 7 do s := s + 6;
  Writeln(s);
end.

Во-вторых, при выполнении выше указанного кода s=30