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

Var s,k: integer;
Begin
s := 0;
for k := 3 downto 7 do
s := s + 6;
writeln\(s\);
End.