Показать сообщение отдельно
Старый 15.02.2011, 08:59   #12 (permalink)
jax
Технарёнок
 
Регистрация: 30.12.2010
Сообщений: 77
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
По умолчанию

Код:
uses graphABC;
begin
setpenwidth(3);
setpencolor(clblack);
circle(250,250,120);
line(130,250,370,250);
line(250,130,250,370);
line(165,165,335,335);
line(165,335,335,165);
CIRCLE(250,250,15);
line(235,205,250,250);
SetFontSize(15);
textout(210,180,'10');
textout(270,180,'20');
textout(300,220,'30');
textout(300,270,'40');
textout(270,310,'50');
textout(210,310,'60');
textout(170,270,'70');
textout(170,220,'80');
redraw;
end.
вот барабан,помогите сделать чтобы он крутился на месте
Замечание:
Не дублируйте сообщения и не плодите темы-клоны! Тема-дубликат удалена.
jax вне форума   Ответить с цитированием
Ads

Яндекс

Member
 
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070