Содержание
- 2. Режимы работы монитора: Текстовый – на экране 25 строк по 80 символов в строке. Т.о. на
- 3. Графический экран 0 639 479 x y Курсор, указывающий текущее положение, НЕВИДИМЫЙ
- 4. Инициализация графического режима USES crt, graph; VAR gd, gm : Integer; …….. Begin gd:=detect; InitGraph(gd, gm,
- 5. Графические процедуры управления цветом и шаблоном заполнения SetColor (N); Устанавливает цвет рисования линий и примитивов 2.
- 6. Графические примитивы 1. PutPixcel (x, y, c); Выводит точку с координатами (x,y) текущим цветом 2. Line(x1,
- 7. Примеры 0 639 479 Putpixcel(100,100,14);SetColor(6); Rectangle(200,200,400,350); Circle(500,300,50); SetFillStyle(1,2); Bar(200,100,400,180); 100 100 200 200 400 350 500
- 8. 5. Bar(x1,y1,x2,y2); Выводит закрашенный прямоугольник с координатами верхнего левого угла и нижнего правого угла цветом и
- 9. 8. FillEllipse(x,y,xr,yr); Выводит закрашенный эллипс с центром в точке (x,y) и полуосями xr, yr. 9. Bar3D(x1,y1,x2,y2,d,t);
- 10. Примеры 0 639 479 100 100 SetFillStyle(1,14); Bar(100,100,200,300);SetColor(1); Ellipse(300,300,0,90,50,50); . FillEllipse(500,350,50,100); 200 300 300 350 500
- 11. 0 639 479 100 100 SetFillStyle(1,6); Bar3D(100,100,200,200,30,true); Sector(300,250,90,180,50,50); 200 200 300 250
- 12. Задача. Написать программу рисования гриба на экране компьютера. ПРИМЕР
- 13. program grib; uses crt,graph; var gd,gm:integer; begin gd:=detect; initgraph(gd,gm,''); {Земля} setfillstyle(9,2); bar(0,250,639,479); {Небо} setfillstyle(1,1); bar(0,0,639,250);
- 15. Скачать презентацию