0 / 0 / 0
Регистрация: 20.12.2013
Сообщений: 8
|
|
1 | |
Нужно задать движение квадрата по линии!26.12.2013, 00:05. Показов 818. Ответов 0
Метки нет (Все метки)
Имеется такой код программы:
Код
Program Strip_Moebius; uses crt, Graph; var gd,gm,color:integer; Procedure punkt2; begin clrscr; InitGraph(gd,gm,''); color:=7; setBkColor(7); cleardevice; Setcolor(5); Ellipse (300,350,90,135,145,200); line (213,277,320,297); Arc (367,226,130,220,100); Arc (233,237,140,245,45); line (273,260,420,180); Arc (265,280,38,87,80); Arc (140,255,354,15,290); Ellipse (353,220,253,308,125,80); Ellipse (335,259,405,106,120,113); setfillstyle(1,9); floodfill(250,270,5); setfillstyle(1,9); floodfill(300,270,5); setfillstyle(1,9); floodfill(320,170,5); Arc (335,230,130,212,100); setfillstyle(1,5); Bar(265,155,270,160); readkey; closegraph; end; Буду Очень Благодарен за помощь!
0
|
26.12.2013, 00:05 | |
Ответы с готовыми решениями:
0
Нужно нарисовать и задать движение в Delphi! Нужно при нажатии на кнопку "Старт" маленький шар начинает движение вокруг большого по линии Дана площадь квадрата S, нужно найти сторону и диагональ квадрата Движение квадрата |
26.12.2013, 00:05 | |
26.12.2013, 00:05 | |
Помогаю со студенческими работами здесь
1
Движение квадрата Движение квадрата. Движение квадрата с клавиатуры Движение рёбер квадрата Искать еще темы с ответами Или воспользуйтесь поиском по форуму: |