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

UptoLike

ВУЗ: 

ПГУ | Пенза

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

Рубрика: 

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




   5. Определить и вывести в центр экрана сообщение о количестве цве-
тов в палитре. Очистить экран.
   6. Нарисовать залитые сектор, многоугольник, круг, подписать их
названия, используя шрифты различного размера.
   7. Очистить экран.
   8. Разделить экран на две части, для чего провести диагональ из
правого верхнего угла.
   9. В верхней половине вывести текст "Good bye" различными шриф-
тами и разных размеров (начиная с самого большого) в горизонтальном
направлении, а нижней - в вертикальном.
   10. Очистить экран.
   11. Нарисовать изображение, движущееся из центра экрана в левый, верхний
угол




                                   Вариант 3

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

Страницы