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

UptoLike

ВУЗ: 

ПГУ | Пенза

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

Рубрика: 

52
52
10. Очистить экран.
11. Нарисовать изображение, движущееся из правого, верхнего угла экрана
вертикально вниз
Вариант 4
1. Построить залитый прямоугольник с координатами х1 = 25, y1 = 10,
x2 = maxx-25, y2 = maxy-10, maxx, maxy - размеры экрана (тип заливки - 3, цвет -
ярко-красный).
2. Построить три одинаковых по высоте и различных по ширине и
глубине параллелепипеда, c различными типами заливки и различным цветом.
3. На каждой из построенных фигур указать площадь, предварительно
их вычислив.
4. Изменить цвет
ярко-красный в палитре на цвет голубой, используя
процедуру SetPalette.
5. Определить и вывести в центр экрана сообщение о количестве цветов в
палитре. Очистить экран.
6. Нарисовать залитые сектор, многоугольник, круг, подписать их названия,
используя шрифты различного размера.
7. Очистить экран.
8. Разделить экран на две части, для чего провести диагональ из правого
верхнего угла.
9. В верхней половине вывести текст "What is your name?" различными
шрифтами и разных размеров (начиная с самого большого) в горизонтальном
направлении, а в нижней - в вертикальном.
10. Очистить экран.
11. Нарисовать изображение, движущееся из левого, нижнего угла экрана
вертикально вверх. 
                                                                              52




   10. Очистить экран.
   11. Нарисовать изображение, движущееся из правого, верхнего угла экрана
вертикально вниз




                                   Вариант 4

   1. Построить залитый прямоугольник с координатами х1 = 25, y1 = 10,
x2 = maxx-25, y2 = maxy-10, maxx, maxy - размеры экрана (тип заливки - 3, цвет -
ярко-красный).
   2. Построить три одинаковых по высоте и различных по ширине и
глубине параллелепипеда, c различными типами заливки и различным цветом.
   3. На каждой из построенных фигур указать площадь, предварительно
их вычислив.
   4. Изменить цвет ярко-красный в палитре на цвет голубой, используя
процедуру SetPalette.
   5. Определить и вывести в центр экрана сообщение о количестве цветов в
палитре. Очистить экран.
   6. Нарисовать залитые сектор, многоугольник, круг, подписать их названия,
используя шрифты различного размера.
   7. Очистить экран.
   8. Разделить экран на две части, для чего провести диагональ из правого
верхнего угла.
   9. В верхней половине вывести текст "What is your name?" различными
шрифтами и разных размеров (начиная с самого большого) в горизонтальном
направлении, а в нижней - в вертикальном.
   10. Очистить экран.
   11. Нарисовать изображение, движущееся из левого, нижнего угла экрана
вертикально вверх.




                                                                              52

Страницы