ТЫЦЬ! Стальна мишка... жесть!
жарти,історії,приколи)
Сообщений 21 страница 30 из 30
Поделиться212008-01-16 21:57:05
- Модератор
- Зарегистрирован: 2007-12-05
- Приглашений: 0
- Сообщений: 24
- Уважение: [+0/-3]
- Позитив: [+0/-1]
- Пол: Мужской
- Возраст: 32 [1993-01-18]
- Провел на форуме:
9 часов 32 минуты - Последний визит:
2008-05-02 10:12:47
Поделиться222008-01-16 22:04:59
- Модератор
- Зарегистрирован: 2007-12-06
- Приглашений: 0
- Сообщений: 121
- Уважение: [+1/-9]
- Позитив: [+1/-4]
- Провел на форуме:
22 часа 53 минуты - Последний визит:
2008-02-22 23:58:15
Недавно на стінці в жіночій роздягальні прочитав веселий діалог...
Я креведко
А я целко
А я нед
І ти неодінока...
Поделиться232008-01-23 18:52:17
- приємно познайомитись!)
- Откуда: 9 б
- Зарегистрирован: 2007-12-06
- Приглашений: 0
- Сообщений: 63
- Уважение: [+6/-2]
- Позитив: [+2/-1]
- Пол: Мужской
- Провел на форуме:
1 день 3 часа - Последний визит:
2008-02-19 18:29:47
Хтось веселий у Вікіпедії у статті"Дерево Піфагора" переклав код програми на Delphi на російську мову 
Я не думав,шо знайдуться люди,які додумаються зробити таке.
# Программа на Delphi рисующая дерево Пифагора
сброс
#Высота холста. Рисунок будет ей пропорционален
Разм = 600
нов_размер_холста Разм*1.5, Разм
#Цвет неба
нов_цвет_холста 230, 255, 255
иди 0, Разм-9
#Ширина и цвет земли
нов_ширина_пера 20
нов_цвет_пера 24, 118, 30
направление 90
вперёд Разм*1.5
#Функция, рисующая квадрат с треугольником
#Параметры - ширина квадрата, "глубина" элемента
выучи ПШ ширина, номер [
нов_ширина_пера 7 - номер/2
нов_цвет_пера 49+номер*4, 41+номер*16, 25+номер*4
перо_опусти
# Рисуем квадрат
повтори 4 [
вперёд ширина
налево 90
]
вперёд ширина
#Рисуем треугольник
налево 45
вперёд 1.4142*ширина/2
налево 90
вперёд 1.4142*ширина/2
#Перемещаемся в начало следующего квадрата
перо_подними
налево 135
вперёд ширина
налево 45
#"Глубина" элемента
номер = номер + 1
#Если глубина рекурси меньше 10, то рисуем
#следующий элемент
если (номер <10) [
#Рисуем правую ветвь
ПШ ширина / 1.4142, номер
направо 90
#Рисуем левую ветвь
ПШ ширина / 1.4142, номер
налево 45
вперёд ширина
налево 45
]
#Возвращаемся в начало квадрато
налево 135
вперёд ширина
налево 90
вперёд ширина
номер = номер - 1
]
#Перемещаемся к точке, откуда рисуем дерево
иди Разм*0.75+Разм/8.2, Разм-10
направление 0
#Рисуем дерево (Можно вызвать столько раз,
#сколько нужно нарисовать деревьев
ПШ Разм/4.1, 0
спрячь
Поделиться242008-01-23 19:37:59
- СамыйЖгучий
- Откуда: Оболонь - -=!!THE RULE!!=-
- Зарегистрирован: 2007-12-05
- Приглашений: 0
- Сообщений: 109
- Уважение: [+0/-1]
- Позитив: [+4/-0]
- Провел на форуме:
1 день 21 час - Последний визит:
2008-05-30 07:37:39
не выкупил прикол((
Поделиться252008-01-23 20:02:36
- Модератор
- Зарегистрирован: 2007-12-06
- Приглашений: 0
- Сообщений: 121
- Уважение: [+1/-9]
- Позитив: [+1/-4]
- Провел на форуме:
22 часа 53 минуты - Последний визит:
2008-02-22 23:58:15
Я теж щось не дуже зрозумів суть...
Поделиться262008-01-23 20:14:51
- приємно познайомитись!)
- Откуда: 9 б
- Зарегистрирован: 2007-12-06
- Приглашений: 0
- Сообщений: 63
- Уважение: [+6/-2]
- Позитив: [+2/-1]
- Пол: Мужской
- Провел на форуме:
1 день 3 часа - Последний визит:
2008-02-19 18:29:47
Ну багато матеріалів беруть же англійською мовою,а потім перекладають і якийсь розумник переклав код програми.Не бачу нічого незрозумілого.
Наприклад якби це було на paskal*і:
Repeat
write(Hello!)
until x<>true
він перекладає як
повтори
напиши(Привет!)
пока x не будет правильно
Ну короче зайдіть на цю статтю і зрозумієте
Мені особливо сумно,шо я вже радий хтів скопіювати програму,а мені оттаку-то веселіщ підсунули
Поделиться272008-01-23 20:17:43
- СамыйЖгучий
- Откуда: Оболонь - -=!!THE RULE!!=-
- Зарегистрирован: 2007-12-05
- Приглашений: 0
- Сообщений: 109
- Уважение: [+0/-1]
- Позитив: [+4/-0]
- Провел на форуме:
1 день 21 час - Последний визит:
2008-05-30 07:37:39
не НАПИШИ, а НАПИСАТЬ, а вобще это не смешно, а грустно
Поделиться282008-01-23 20:19:53
- приємно познайомитись!)
- Откуда: 9 б
- Зарегистрирован: 2007-12-06
- Приглашений: 0
- Сообщений: 63
- Уважение: [+6/-2]
- Позитив: [+2/-1]
- Пол: Мужской
- Провел на форуме:
1 день 3 часа - Последний визит:
2008-02-19 18:29:47
To Aggerres:
Я навчився фракталу відрізати голову-там тільки у формулах треба підправиті поробив ще декілька видів фракталів(з більш компактною,але більш граціозною графікою)
Отредактировано Securus (2008-01-23 20:20:21)
Поделиться292008-01-23 20:21:58
- приємно познайомитись!)
- Откуда: 9 б
- Зарегистрирован: 2007-12-06
- Приглашений: 0
- Сообщений: 63
- Уважение: [+6/-2]
- Позитив: [+2/-1]
- Пол: Мужской
- Провел на форуме:
1 день 3 часа - Последний визит:
2008-02-19 18:29:47
Тільки в Mandrand трохи кривий код-я його не зовсім розумію
Поделиться302008-01-23 20:24:11
- приємно познайомитись!)
- Откуда: 9 б
- Зарегистрирован: 2007-12-06
- Приглашений: 0
- Сообщений: 63
- Уважение: [+6/-2]
- Позитив: [+2/-1]
- Пол: Мужской
- Провел на форуме:
1 день 3 часа - Последний визит:
2008-02-19 18:29:47
aGGeRReS написал(а):
а вобще это не смешно, а грустно
К несчастью нету темы "Совместное прклинание криворуких переводчиков"