Нужна написанная программа какого - нибудь рисунка - вопрос №7520921 от prostosadkotik 14.05.2022 15:20

Question

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

prostosadkotik · Answer

Делал в 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.