var s,k: integer;
begin
s := 0;
for k := 3 to 7 do
s := s + 6;
writeln\(s\);
end.

Запишите зна­че­ние переменной s