Нужна написанная программа какого - нибудь рисунка на турбо паскале ( дом и дерево не нужно

Делал в PascalABC, но в Turbo тоже должно работать. Если не работает, попробуйте перед "End." вставить "Readln".

Program Kisa;
Begin     
 Writeln('$$$$');      Writeln('$___$$___$');      Writeln('$$');     Writeln('$sss___sss$');      Writeln('$іііі$');      Writeln('$$$$$');      Writeln('$$$');      Writeln('___$$$$$$$');      Writeln('$$$______$');      Writeln('$$$__$$__$');      Writeln('$$$__$$__$');      Writeln('$$_____$$__');      Writeln('$___$$$__$$___$___$');      Writeln('$__$$$__$$__$$');      Writeln('$___$$$__$$_$__$$');      Writeln('$__$$$___$_$$___$');      Writeln('$____$___$___$_$$___$');      Writeln('_$$$$$');      Writeln('$$$_$$$_$$$');      Writeln('___');
End.