Программалау тілінде модельдер құру. Сабақтың мақсаты: Білімділік

жүктеу/скачать 0,57 Mb.

бет	2/6
Дата	12.03.2018
өлшемі	0,57 Mb.
	#39135
түрі	Программа

1 2 3 4 5 6

Кейбір түстер тізімі:

Ағылшынша	Қазақша	Ағылшынша	Қазақша
clBlack	қара	clCream	Ақсұр
clPurple	күлгін	clAqua	бирюзовый
clWhite	ақ	clOlive	қара жасыл
clMaroon	қою-қызыл	clFuchsia	Сирен түстес
clRed	қызыл	clTeal	Жасыл қөк
clNavy	қою-көк	clGray	сұр
clGreen	жасыл	clLime	ашық жасыл
clBrown	қоңыр	clMoneyGreen	Жасыл ақша түс
clBlue	көк	clLtGray	ашық сұр
clSkyBlue	көгілдір	clDkGray	қою сұр
clYellow	Сары	clMedGray	сұп сұр
		clSilver	күміс түстес

Түстерді RGB палитрасымен беруге болады: cол үшін түс орнына rgb(r,g,b) жазылады: мұндағы r,b,g - 0 ден 255 –ге дейінгі сандар.

Шрифт стильдері:

Ағылшынша	Орысша атауы
fsNormal	обычный;
fsBold	жирный;
fsItalic	наклонный;
fsBoldItalic	жирный наклонный;
fsUnderline	подчеркнутый;
fsBoldUnderline	жирный подчеркнутый;
fsItalicUnderline	наклонный подчеркнутый;
fsBoldItalicUnderline	жирный наклонный подчеркнутый.

Мысалдар арқылы еске түсірейік:

uses GraphABC;

begin

SetWindowSize(700,500);

FloodFill(10,10,clblue);

SetPenWidth(5);

setpencolor(clgreen);

setpixel(200,30,clred);

SetBrushColor(clSkyBlue);

circle(180,100,50);

SetFontName('kz poster');

SetFontColor(clred);

SetFontSize(20);

SetFontStyle(fsBoldItalicUnderline);

SetBrushColor(clblue );

TextOut(300,100,'шеңбер');

TextOut(300,200,'тіктөртбұрыш');

TextOut(300,310,'эллипс');

TextOut(300,400,'кесінді салу');

SetBrushColor(clMaroon );

rectangle(100,180,280,260);

SetBrushColor(clFuchsia );

ellipse(100,290,280,370);

Line(100,400,250,430);

MoveTo(100,400);

LineTo(300,480);

LineTo(250,430);

FloodFill(250,450,clyellow);

end.

Графикалық экранда пайда болады:

Тапсырма:

Суреттегі сызбаны салу керек.

Программа төмендегідей:

Program Shar;
uses GraphABC;
Begin
Line (200,200,400,200);

LineTO (300,140);

lineTO (200,200);
FloodFill (300,170,clblue);
Line (200,200,400,200);

LineTo (300,260);

LineTo (200,200);
FloodFill (300,230,cllime);
circle (160,200,40);
FloodFill (160,200,clred);
circle (440,200,40);
FloodFill (440,200,clyellow);
End.

Графикалық экранда пайда болады:

Тапсырма1. Төмендегі суретті салу программасын құрыңыз.

жүктеу/скачать 0,57 Mb.

Достарыңызбен бөлісу:

1 2 3 4 5 6