VAR S, K: INTEGER;
BEGIN
S:=0;
FOR K:=3 TO 7 DO
S:=S+6;
WRITELN \(S\)
END.