1. Сурет салу және тексті шығару үшін қажет Graph және Crt модульдерінің процеуралары мен функциялары.
2. Сызықтың типі, үлгісі және қалыңдығы(SetLineStyle процедурасы).
3. Қаріптерді басқару(SetTextStyle процедурасын).
4. Штрихтау тұрақтылары d (SetFillStyle процедурасы).
5. Текст түрлері C (Text Color).
450
500
550
600
640
50
100
150
200
300
250
350
400
440
480
Х=640
Y=480
450
500
550
600
640
50
100
150
200
300
250
350
400
440
480
Мысалы: Нүкте салу керек
Х
У
Putpixel(x,y,c)
Program suret;
Uses graph;
Var driver,mode:integer;
Begin
Driver:=detect; initgraph(driver, mode,’c;\tp7\bgi’);
Putpixel (150,200,4);
Readln;
Closegraph;
End.
450
500
550
600
640
50
100
150
200
300
250
350
400
440
480
Мысалы: шеңдер салу керек
Х
У
R
Program suret;
Uses graph;
Var driver,mode:integer;
Begin
Driver:=detect; initgraph(driver, mode,’c;\tp7\bgi’);
Putpixel (150,200,4);
Circle (150,200,50);
Readln;
Closegraph;
End.
Circle(x,y,R)
450
500
550
600
640
50
100
150
200
300
250
350
400
440
480
Мысалы: Cызық салу керек
Line(x1,y1,x2,y2)
Program suret;
Uses graph;
Var driver,mode:integer;
Begin
Driver:=detect; initgraph(driver, mode,’c;\tp7\bgi’);
Line(100,150,250,150);
Readln;
Closegraph;
End.
450
500
550
600
640
50
100
150
200
300
250
350
400
440
480
Жоғарыда көрсетілген нүктелердің
қосылуы бойынша графикалық режимде
сурет салу
Сиқырлы сурет
Это сайт презентаций, где можно хранить и обмениваться своими презентациями, докладами, проектами, шаблонами в формате PowerPoint с другими пользователями. Мы помогаем школьникам, студентам, учителям, преподавателям хранить и обмениваться учебными материалами.
Email: Нажмите что бы посмотреть