Xreferat.com » Рефераты по информатике и программированию » Разработка программы для построения кривых Серпинского i-го порядка
Разработка программы для построения кривых Серпинского i-го порядка
( setq x0 ( - x0 h ) ) ;Вычисление координат начальной
( setq h ( div h 2 ) ) ;точки для рисования и
( setq y0 ( + y0 h ) ) ;единичной длины линии
( setq Px x0 Py y0 ) ;Установка пера
( color i ) ;Установка цвета для рисования
( A i ) ( Line 1 h ) ;Рисование
( B i ) ( Line 3 h )
( C i ) ( Line 5 h )
( D i ) ( Line 7 h )
( pause 1.0 ) ;Задержка
( setq i ( + i 1 )) ;Инкримент счетчика
) ;Конец основного цикла
)
( print Try (SierpinskiCurve 4) ) ;Подсказка
Руководство пользователя Требования к системе: x86 персональный компьютер (386 минимум; 486, Pentium, или Pentium Pro рекомендуется) Microsoft DOS 3.30 или выше Microsoft Windows 3.1, Microsoft Windows for Workgroups, Microsoft Windows 95, Microsoft Windows NT 3.51 или 4.0 512 Kb RAM 5 Kb свободного пространства на жестком диске Установленный интерпретатор XLisp версии 2.1 или вышеДля запуска программы необходимо:
Включить компьютер Загрузить интерпретатор XLisp c параметром “Sierpins.lsp”: C:XLISPXLISP.EXE SIERPINS.LSPÃ В ответ на приглашение XLisp ввести: (SierpinskiCurve 4)Ã Тест программыТест проводился на рабочей станции со следующей конфигурацией:
Pentium 166 32 Mb RAM SyncMaster 17Glsi S3 Trio64V+ Windows 95 Интерпретатор XLisp был запущен в окне MS-DOS.Программа тестировалась при значениях параметра Count от 1 до 4. В результате тестов были получены следующие изображения на экране монитора:
Рисунок 5
Рисунок 6
Рисунок 7
Рисунок 8
Литература “Алгоритм + структура данных = программа”, H.Вирт “XLisp-Plus 2.1 Programmers Manual”, David Michael BetzЕсли Вам нужна помощь с академической работой (курсовая, контрольная, диплом, реферат и т.д.),
обратитесь к нашим специалистам. Более 90000 специалистов готовы Вам помочь.
Бесплатные корректировки и доработки. Бесплатная оценка стоимости работы.
Нужна помощь в написании работы?
Мы - биржа профессиональных авторов (преподавателей и доцентов вузов). Пишем статьи РИНЦ, ВАК, Scopus.
Помогаем в публикации. Правки вносим бесплатно.