Презентация на тему Мәтін жазу тәсілі. Презентация.

Мұғалім 2 цифрын көтереді. Оқушылар 2-ден топ құрады. 4

цифрына - 4 топ, 3цифрына 3 топ құрады.
3- топқа әр түсті стикерлер таратылады.

II Ton-
III Ton -
I Ton

II. Электронды оқулық
IІI. Топтастыру
I.Бағдарлама

Uses Graph, crt;
Var d,m : integer;
Begin

d:= detect;
initgraph ( d, m, ‘C:\Bp\Bgi ‘);
Setfillstyle(solidfill, White) ;
Bar(80,80,200,135);
setcolor(2);
Circle(100,100,15);
setcolor(0);
Circle(140,100,15);
setcolor(4);
Circle(180,100,15);
setcolor(14);
Circle(120,115,15);
setcolor(1);
Circle(160,115,15);
readln ;
closegraph;
End.

Алтыбұрыш
бағдарламасы
Program ALTUBUR;
Uses Graph, crt;
Var d,m : integer;
Begin
d:= detect;
initgraph ( d, m,‘C:\Bp\Bgi‘);
setcolor(7);
line (420,80,500,60);
line (500,60,560,80);
line (560,80,560,200);
line (560,200,500,220);
line (500,220,420,200);
line (420,200,420,80);
readln ;
closegraph;
End.

Үй салу бағдарламасы
Program E_3;
Uses Graph, crt;
Var d,m : integer;
Begin
d:= detect;
initgraph ( d, m, ‘C:\Bp\Bgi ‘);
Setcolor(15);
Rectangle (50,100,250,225);
Setcolor(4);
Bar(100,125,125,160);
setcolor(15);
line (50,100,150,25);
line (150,25,150,225);
Setcolor(4);
Circle(150,75,20);
readln ;
closegraph;
End.

процедурасын атаңдар

мүмкіндіктері;
Жаңа сабақты бекітуге тапсырмалар

шығаруға болады.

2.Outtextxy (x ,у : integer; Tex:String);-мәтін х,у координаталарынан

басталып жазылады.

3.Set Text Style(Font: word; Direction: word: Char Sise:word);- шығарылатын мәтіннің стилін орнатады.

4.SetUserCharSize(MultX, DivX,MultY,DivY:word);- символдардың өлшемін - енін , биіктігін өзгерту үшін пайдаланылады.

Графиктік режимде құрылған геометриялық
фигураларға түсінік беруде
мәтін жазу процедуралары қолданылады.

Мәні Мүмкіндіктері
Қаріп типі

DefaultFont 0 8x8 битті қаріп

TriplexFont 1 штрих (үш еселі) қаріптер

SansSerifFont 2 кіші қаріп

SmallFont 3 сансериф қаріп

GothicFont 4 готикалык (графикалык) қаріп

Қаріптің бағыты

GorizDir 4 солдан оңға карай
VertDir 1 төменнен жоғары карай

Қаріп жазу мүмкіндіктері

d:=detect;
initgraph ( d,m,'

C:\bp\bgi ');
Rectangle (100,100,400,400);
setcolor(3);
OuttextXY (150,150,'COMPUTER ');
Settextstyle (4,1,3); setcolor (15);
OuttextXY (150,180,'COMPUTER ');
Settextstyle ( 3,0,1); setcolor (4);
readln;
closegraph;
end.

Мысалы: Төртбұрыш ішіне
мәтін жазу

паскаль

“Қазақстан,Астана” мәтінін шығаратын бағдарлама құрыңдар.
№2 тапсырма
Экранға екі тіктөртбұрыш салып,

ішіне физиканың әртүрлі формуласын жазыңдар.

№3 тапсырма

Экранға конфет суретін салып, сыртына өндірілген фабрика атауын мәтін етіп енгізу керек.

X:=random(640);
Y:=random(350);

PutPixel(X,Y,4);
end.

Begin
d:=detect; initgraph(d,m,'C:\Bp\Bgi');
Wndow (100,100,400,400); setcolor(3);
OuttextXY(150,150,'ИНФОРМАТИКА ');
Settextstyle(4,1,3); setcolor(15);
end.

Begin
d:=detect;initgraph(d,m,' C:\Bp\Bgi ');
Rectangle(100,100,400,400); setcolor(3);
OuttextXY(150,200,' Технология ');
Settextstyle(4,1,3); setcolor(15);
end.

For i:=1 to 10 do
begin
X:=random(640);
Y:=random(350);
Setcolor(random(15));
Circle(X,Y,50);
end.

“Білгенге - маржан”
Мына бағдарлама үзінділерінен экранда қандай нәтиже көрінеді?

салуға арналған процедура
4.Геометриялық фигураларды кез келген жағдайда бейнелеу процедурасы
5.Мәтін

жазуға арналған процедура
6.Нәтиже шығаратын оператор
7.Обьектінің түсін беретін процедура

Сөзжұмбақ “Windows”

тест

әртүрлі фигуралар

салып, ішіне фигура атын
мәтін етіп енгізу бағдарламасын
құру керек.