Р. А. Юсупов, С. Н. Искандарова, Ш. Мирзанова C/C++ тилида топшириқ ва масалалар Самарқанд – 2013 йил


Download 1.35 Mb.
bet80/105
Sana13.04.2023
Hajmi1.35 Mb.
#1353566
TuriУчебник
1   ...   76   77   78   79   80   81   82   83   ...   105
Bog'liq
CPP masalalari1


Часть IL Решения 173
#define PATHTODRIVER "с: WborlandcWbgiW"
void main (void)
{
int gdriver = DETECT; // драйвер
int gmode; // режим
int errorcode; // код ошибки
initgraph(&gdriver, &gmode, PATHTODRIVER);
errorcode = graphresult();
if (errorcode != grOk) // ошибка инициализации
// графического режима
{
printf("Ошибка: %d\n", errorcode);
puts("Для завершения программы нажмите ");
getch();
exit(l);
}
// полотнище флага - сплошная заливка серым цветом
setfillstyle(SOLID_FILL,LIGHTGRAY); //
bar(80,80,200,135);
// кольца
setcolor(GREEN); // зеленое
circle(100,100,15);
setcolor (BLACK"); // черное
circle(140,100,15);
setcolor(RED); // красное
circle(180,100,15);
setcolor(YELLOW); // желтое
circle(120,115,15);
setcolor(BLUE); // синее
circle(160,115,15);
getch();
closegraph0; // выход из графического режима
174 C/C++ в задачах и примерах
Задача 208
// Выводит корабль (с использованием метода базовой точки)
#include
tinclude
iinclude
tinclude
#define dx 10 // шаг сетки по X
#define dy 10 // шаг сетки по Y
void ship(int x, int y) // x, у - координаты базовой точки
{
// корпус
moveto(х^у);
lineto(х,y-2*dy);
lineto(x+10*dx,y-2*dy);
lineto(x+ll*dx,y~3*dy);
lineto(x+17*dx,y-3*dy);
lineto(x+14*dx,y);
lineto(x,y);
// надстройка
moveto(x+3*dx,y-2*dy);
lineto(x+4*dx,y-3*dy);
lineto(x+4*dx,y~4*dy);
lineto(x+13*dx,y-4*dy);
lineto(x+13*dx,y-3*dy);
line(x+5*dx,y~3*dy,x+9*dx,y-3*dy);
// капитанский мостик
rectangle (x-i-8*dx, y-4*dy, x+ll*dx, y-5*dy) ;
// труба
rectangle(x+7*dx,y-4*dy,x+8*dx,y-7*dy);
// иллкминаторы
circle {x+12*dx,y'-2*dy,dx/2) ;
circle(x+14*dx,y-2*dy,dx/2);
// мачта
line(x+10*dx,y-5*dy,x+10*dx,y-10*dy);
// оснастка
moveto(x+17*dx,y-3*dy);
lineto(x+10*dx,y-10*dy);
lineto (x, y-'2*dy) ;
}

Download 1.35 Mb.

Do'stlaringiz bilan baham:
1   ...   76   77   78   79   80   81   82   83   ...   105




Ma'lumotlar bazasi mualliflik huquqi bilan himoyalangan ©fayllar.org 2024
ma'muriyatiga murojaat qiling