4*. Відкрийте у програмі Paint указаний учителем графічний файл (наприклад, Розділ 1 Пункт 1.1\завдання 1.1.4.bmp) та:
а) змініть розміри аркуша зображення. Збережіть малюнок
у вашій папці у файлі з іменем завдання 1.1.4_1.bmp;
б) змініть палітру зображення на чорно-білу. Збережіть малюнок
у вашій папці у файлі з іменем завдання 1.1.4_2.bmp;
в) порівняйте розміри трьох файлів. Поясніть результат.
uses drawman;
Procedure w;
Begin
PenDown;
OnVector (0,-7);
OnVector (2,0);
OnVector (0,7);
PenUp;
OnVector (0,-7) ;
PenDown;
OnVector (2,0);
OnVector (0,7);
PenUp;
end;
procedure T;
Begin
PenDown;
OnVector (0,7);
OnVector (-2,0);
OnVector(4,0); penUp;
end;
procedure O;
Begin
PenDown;
OnVector (4,0);
OnVector (0,7);
OnVector (-4,0);
OnVector (0,-7);
PenUp;
end;
procedure R;
PenDown;
OnVector (0,7);
OnVector (4,0);
OnVector (0,-4);
OnVector (-4,0);
PenUp;
end;
procedure A;
begin
PenDown;
OnVector (2,7);
OnVector (2,-7);
PenUp;
OnVector (-3,3);
PenDown;
OnVector (2,0);
PenUp;
end;
begin
Field (32,10);
ToPoint (3,7); w;
OnVector (4,-7); T;
OnVector (2,-7); O;
OnVector (6,0); R;
OnVector (5,-3); A;
end.
Вроде работает