Фамилия имя 

Контрольная на работу с графикой
точки, линии, тексты, квадраты и копирование рисунков.
Все задания нужно реализовать в виде подпрограмм 
отрисовки с передачей им канваса.
Например:
PROCEDURE RIS(C:TCanvas);
......
....
..
.

1) написать подпрограмму, которая нарисует 
на экране размером 300 х 200 организовать три зоны
на первой (0,0,100,200) нарисовать множество случайных точек
на второй (100,0,200,200) нарисовать множество линий
на третьей(200,0,300,200) нарисовать квадраты

2) Написать подпрограмму, рисующую вид из окна "космического истребителя" 
черный экран, звездное небо и перекрестие прицела (2-е белые линии по 
центру экрана) размер экрана 600 х 200.

3) Написать подпрограмму, которая на экране размером 800 х 600
нарисует на белом фоне черные оси координат (по центру)
и нарисует на осях измерительные риски (через 5 пикселов)

4) Есть картинка IMAGE1 на ней рисунок 32 х 32
написать подпрограмму которая выдаст на канвас размером 800 600
200 таких рисунков в случайными координатами.


ВНИМАНИЕ! а теперь задания в которых нужно подумать!

5) Написать подпрограмму, которая выдает множество случайных точек на экран
600 х 600
но точки должны помещаться в области 0,0 - 600,0 - 0,600
Тоесть граница их наискосок :-)
(если не можете, то просто звездное небо таких размеров (но тогда только 4 балла)

6) Есть картинка на канвасе размерно 800 х 600. напишите 
подпрограмму, которая заменит все белые точки на картинке на зеленые!
(вспомните, что точки можно не только писать но и читать)