Как нарисовать треугольник Серпинского

perl -e 'print "P1\n256 256\n", map {$_&($_>>8)?1:0} (0..0xffff)' | display


Команда выполняет следующие действия:
— Запускает интерпретатор Perl
— Выводит строку «P1\n256 256\n»
— Генерирует и выводит данные для изображения треугольника Серпинского
— Перенаправляет вывод в команду «display» для отображения изображения

Ответить

Ваш адрес email не будет опубликован. Обязательные поля помечены *