program untitled; uses crt; var i : byte; BEGIN END.