Пример кода для отрисовки снеговика на Pascal:

uses crt;
begin
clrscr;
writeln(' ___');
writeln(' (___)');
writeln(' ( 0 )');
writeln(' (> <)');
writeln(' (___)');
readln;
end.

Скопируйте этот код в среду программирования Pascal и выполните программу, чтобы нарисовать снеговика.