Алгоритмические языки и программирование. Часть 3. Модули в Турбо Паскале. Игошина Л.В. - 38 стр.

UptoLike

ВУЗ: 

ПГУ | Пенза

Составители: 

Рубрика: 

38
38
11. В правой верхней и левой нижней четвертях аналогично п.10
нарисовать эллипсы и дуги (радиусы и углы выбрать самостоятельно).
12. В оставшейся четверти нарисовать 5 прямоугольников, имеющих
линии контура различных стилей и толщины, причем для самого внешнего
контура шаблон разработать самостоятельно.
13. Очистить экран.
14. Нарисовать треугольник и шестиугольник, линии контуров которых
должны иметь
различный цвет.
15. Закрыть графический режим.
Примечание: перед выводом каждого нового изображения останавливать
процесс решения для просмотра.
Вариант 6
1. Инициализацию графического режима организовать в виде отдельной
процедуры с анализом GraphResult.
2. Определить размеры и центр экрана в графическом режиме.
3. Переместить курсор в точку с координатами (450,50) с помощью
процедуры MoveTo и затем в точку
(450,200) процедурой MoveRel.
4. Нарисовать в верхней, левой четверти экрана 160 точек, выбирая
координаты и цвета случайным образом.
5. Очистить экран.
6. Нарисовать на экране множество линий разного стиля и цвета,
используя все возможные процедуры рисования линий.
7. Определить положение графического курсора.
8. Перейти в текстовый режим и вывести на экран координаты графического
курсора и размеры
экрана. Вернуться в графический режим.
9. Разделить экран на четыре части: провести диагонали через центр экрана.
10. В верхней четверти нарисовать три окружности, имеющие общий центр и
радиусы 35, 40, 45. Линии окружностей должны быть разного цвета.
11. В левой и нижней четверти, аналогично п.10, нарисовать эллипсы и дуги
(радиусы и углы выбрать самостоятельно).
12. В оставшейся четверти нарисовать 5 прямоугольников, имеющих
линии контура различных стилей и толщины, причем для самого внешнего
контура шаблон разработать самостоятельно.
13. Очистить экран.
14. Нарисовать пяти и шестиугольник, линии контуров которых должны иметь
различный цвет.
15. Закрыть графический режим.
Примечание: перед выводом каждого нового изображения останавливать
процесс решения для просмотра.
В
модуле Graph предусмотрены процедуры рисования залитых фигур. 
                                                                             38




11. В правой верхней и левой нижней четвертях аналогично п.10
нарисовать эллипсы и дуги (радиусы и углы выбрать самостоятельно).
12. В оставшейся четверти нарисовать 5 прямоугольников, имеющих
линии контура различных стилей и толщины, причем для самого внешнего
контура шаблон разработать самостоятельно.
13. Очистить экран.
14. Нарисовать треугольник и шестиугольник, линии контуров которых
должны иметь различный цвет.
15. Закрыть графический режим.
Примечание: перед выводом каждого нового изображения останавливать
процесс решения для просмотра.

                                   Вариант 6
1. Инициализацию графического режима организовать в виде отдельной
процедуры с анализом GraphResult.
2. Определить размеры и центр экрана в графическом режиме.
3. Переместить курсор в точку с координатами (450,50) с помощью
процедуры MoveTo и затем в точку (450,200) процедурой MoveRel.
4. Нарисовать в верхней, левой четверти экрана 160 точек, выбирая
координаты и цвета случайным образом.
5. Очистить экран.
6. Нарисовать на экране множество линий разного стиля и цвета,
используя все возможные процедуры рисования линий.
7. Определить положение графического курсора.
8. Перейти в текстовый режим и вывести на экран координаты графического
курсора и размеры экрана. Вернуться в графический режим.
9. Разделить экран на четыре части: провести диагонали через центр экрана.
10. В верхней четверти нарисовать три окружности, имеющие общий центр и
радиусы 35, 40, 45. Линии окружностей должны быть разного цвета.
11. В левой и нижней четверти, аналогично п.10, нарисовать эллипсы и дуги
(радиусы и углы выбрать самостоятельно).
12. В оставшейся четверти нарисовать 5 прямоугольников, имеющих
линии контура различных стилей и толщины, причем для самого внешнего
контура шаблон разработать самостоятельно.
13. Очистить экран.
14. Нарисовать пяти и шестиугольник, линии контуров которых должны иметь
различный цвет.
15. Закрыть графический режим.
Примечание: перед выводом каждого нового изображения останавливать
процесс решения для просмотра.

     В модуле Graph предусмотрены процедуры рисования залитых фигур.



                                                                             38

Страницы