Структура программы. Объявление переменных

To’g’ri chiziq

• Line(x1,y1,x2,y2) - (x1,y1) nuqtadan boshlab (x2,y2) nuqtagacha chiiq chizadi.

• Program liniay;
• uses GraphABC;
• begin
• line(100,50,500,250);
• end.

• x1,y1

• x2,y2

• Ranglar

clBlack – qora clPurple – fioletviy clWhite – oq clMaroon – to’q qizil clRed – qizil clNavy – to’q ko’k clGreen – yashil clBrown – jigar rang clBlue – ko’k clSkyBlue – ko’k clYellow – sariq clCream – kremnoviy

clAqua – bruoviy clOlive – olivkoviy clFuchsia – sireniy clTeal – yashil clGray – to’q kulrang clLime –och yashil clMoneyGreen – yashil clLtGray – oh kulrang clDkGray – to’q kulrang clMedGray –kulrang clSilver – kumush rang

• Random(16777215) – Pascal dasturidagi ranglar

• Chiiq rangi

• SetPenColor(color) - color nomerli rangni qalam rangi sifatida o’rnatadi.

• Program liniay;
• uses GraphABC;
• begin
• setpencolor(clred);
• line(30,30,400,350);
• end.

• Nuqtali chiziq

• SetPenStyle(<номер от 1 до 6>); -
• Raqam bo’yicha qalam stilini o’zgartiradi.

• program prim;
• uses GraphABC;
• begin
• Setpencolor(clred);
• SetPenStyle(1); {1 - длинный штрих}
• Line(10,100,350,100);
• SetPenStyle(2); {2 - короткий штрих}
• Line(10,125,350,125);
• SetPenStyle(3); {3 - штрих-пунктир}
• Line(10,150,350,150);
• end.

• Qalin chiziq

• SetPenWidth(n) - n pikselli qalamning kengligini o’rnatadi.

• Program liniay;
• uses GraphABC;
• begin
• setpenwidth(20);
• setpencolor(clred);
• line(30,30,400,350);
• end.

• Program uchburchak;
• uses GraphABC;
• begin
• setpenwidth(20);
• setpencolor(clred);
• line(300,100,500,300);
• lineto(100,300);
• lineto(300,100);
• floodfill(300,200,clgreen);
• end.

•