Определите, что будет напечатано в результате работы следующего фрагмента программы: Var s,k: integer; Begin s := 0; for k := 3 to 7 do s := s + 6; writeln(s); End.