var n:integer; begin read(n); if n=0 then writeln('Нет нулевого дня'); if n=1 then begin writeln('Алгебра'); writeln('Русский'); writeln('Английский'); writeln('Биология'); end; if n=2 then begin writeln('Русский'); writeln('Русский'); writeln('Математика'); writeln('Физра'); end; if n=3 then begin writeln('физра'); writeln('физика'); writeln('биология'); writeln('Английский'); end; if n=4 then begin writeln('Математика'); writeln('Черчение'); writeln('Музыка'); writeln('Информатика'); end; if n=5 then begin writeln('Информатика'); writeln('Русский'); writeln('математика'); writeln('Литература'); end; if n=6 then begin writeln('История'); writeln('ОБЖ'); writeln('общество'); writeln('физра'); end; if n=7 then writeln('Выходной'); end.