Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 25.09.2010, 20:48   #1
matematik
 
Регистрация: 03.05.2010
Сообщений: 9
По умолчанию графика паскаль

как нарисовать в паскале выпуклую ножку человечка, а то не получается(
Изображения
Тип файла: gif Безымянный.GIF (3.0 Кб, 41 просмотров)
matematik вне форума Ответить с цитированием
Старый 25.09.2010, 20:49   #2
_-Re@l-_
C++, Java
Старожил
 
Аватар для _-Re@l-_
 
Регистрация: 10.04.2010
Сообщений: 2,665
По умолчанию

эллипс.....
_-Re@l-_ вне форума Ответить с цитированием
Старый 25.09.2010, 20:59   #3
matematik
 
Регистрация: 03.05.2010
Сообщений: 9
По умолчанию

эллипс легко сказать.
ты код напиши, через эллипс я голову зделал, а ногу не так просто, если б рука была горизонтально либо вертикально, то понятно, а так.
matematik вне форума Ответить с цитированием
Старый 25.09.2010, 21:00   #4
matematik
 
Регистрация: 03.05.2010
Сообщений: 9
По умолчанию

uses graph;
var grd,grm,er,i,k:integer;
begin
grd:=vga;
grm:=vgamed;
initgraph(grd,grm,'');
er:=graphresult;
if er <> grok then
begin
writeln('graph error');
halt(er);
end;
setcolor(14);
rectangle(10,10,310,310);
setcolor(15);
ellipse(150,50,0,360,20,22);
floodfill(150,30,15);

line(150,175,185,75);
line(185,75,115,75);
line(115,75,150,175);
floodfill(150,76,15);

line(185,85,260,85);
line(185,85,210,88);
ellipse(230,85,230,360,30,5);
floodfill(230,86,15);

line(115,85,80,100);
line(80,100,85,105);
line(85,105,115,85);
floodfill(82,100,15);
for i:=0 to 27 do
begin
line(87,107,125-i,153-i);
end;



readln;
closegraph
end.
matematik вне форума Ответить с цитированием
Старый 25.09.2010, 21:01   #5
matematik
 
Регистрация: 03.05.2010
Сообщений: 9
По умолчанию

Вот что я зделал пока, никак не могу придумать как ногу нарисовать(
matematik вне форума Ответить с цитированием
Старый 25.09.2010, 21:32   #6
_-Re@l-_
C++, Java
Старожил
 
Аватар для _-Re@l-_
 
Регистрация: 10.04.2010
Сообщений: 2,665
По умолчанию

А, вспомнил, есть ведь вроде дуги, там можно задать радиус и угол этой дуги.
_-Re@l-_ вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
паскаль. графика vykker Помощь студентам 2 28.06.2010 18:25
Графика. Паскаль Zond235 Паскаль, Turbo Pascal, PascalABC.NET 15 11.06.2010 18:17