Unit error; Interface Uses crt; procedure error1; procedure error2; procedure error3; procedure error4; procedure error5; procedure error6; Implementation {==================================} procedure error1; begin {__________} clrscr; write(^G); writeln('浜様様様様様様様様様'); writeln(' !!!荐!!!! '); writeln(' オ爛皚覃 □ '); writeln('藩様様様様様様様様様'); end; procedure error2; begin {__________} clrscr; write(^G); writeln('浜様様様様様様様様様'); writeln(' !!!荐!!!! '); writeln(' 皀 '); writeln('藩様様様様様様様様様'); end; procedure error3; begin {__________} clrscr; write(^G); writeln('浜様様様様様様様様様様様様様様様様様融'); writeln(' !!!荐!!!! '); writeln(' ┃ 爬謌モ ぎ竅皋竡 '); writeln('藩様様様様様様様様様様様様様様様様様夕'); end; procedure error4; begin {__________} clrscr; write(^G); writeln('浜様様様様様様様様様様様様様様様様様融'); writeln(' !!!荐!!!! '); writeln(' ┃ 爬謌モ ぎ竅皋竡 '); writeln('藩様様様様様様様様様様様様様様様様様夕'); end; procedure error5; begin {__________} clrscr; write(^G); Writeln('浜様様様様様様様様様様様様様様様様様様様様様'); Writeln(' ━┘ '); Writeln(' ° 甌Г ゥ <ぅ ムェ '); Writeln(' !!!КΝ 皀瑙 諷!!! '); Writeln(' '); Writeln('藩様様様様様様様様様様様様様様様様様様様様様'); end; procedure error6; begin {__________} ClrScr; write(^G); WriteLN('浜様様様様様様様様様様様様様様様様様様'); WriteLN(' ° 甌Г '); WriteLN(' Г皀 ムイ 爛皋牀┘ '); WriteLN(' '); WriteLN('藩様様様様様様様様様様様様様様様様様様'); end; END.