Тема
:
Личное творчество
16.06.2007, 04:15
#
869
Suny
Рег-ция: 04.04.2007
Сообщения: 1,004
Записей в дневнике:
158
Благодарности: 3
Поблагодарили 137 раз(а) в 95 сообщениях
Ответ: Личное творчество
Отменить
"Свет на вершине"
for n:=1 to 100000 do
begin
pixels[x0+round(n/100*cos(n/60)),y0+round(n/100*sin(n/15*round(n/100*cos(n/30))))+round(n/100*cos(n/30))] := clWhite;
end;
Suny
Посмотреть профиль
Отправить личное сообщение для Suny
Найти все темы Suny
Найти все сообщения Suny
Найти все сообщения Suny в этой теме
Читать дневник