Вход



    НОВОЕ В БИБЛИОТЕКЕ
● Дифференциальные уравнен...
● Дифференциальные уравнен...
● Дифференциальные уравнен...
● Составление дифференциал...
● Составление дифференциал...
● Производные высших поряд...
● Производные высших поряд...
● Дифференцирование тригон...
● Дифференцирование алгебр...
● Дифференцирование алгебр...

    НОВЫЕ ФАЙЛЫ
● Sm графики функций (beta...
● Graf_builder
● Учимся считать
● Мобильный справочник по ...
● Уникальный калькулятор
● Программа для построения...
● «Новости ПриМата» для An...
● Schedule Builder Light 2...
● График
● Sm Калькулятор


    ЛУЧШИЕ ПУБЛИКАЦИИ
● Бухаете? Тогда я иду к в...
● Считаем сумму ряда
● Новый вирус - три десятк...
● Получить кнопку ТИЦ и Pa...
● Программирование под And...
● Матричный калькулятор (3...
● Пара интересных задач
● Небольшая забава для про...
● Немного юмора для матема...
● Продержись восемнадцать ...

    ЛУЧШИЕ МАТЕРИАЛЫ
● Высшая математика. Лекци...
● Высшая математика. Лекци...
● Умножение матриц (Паскал...
● Высшая Математика. Лекци...
● Высшая математика. Лекци...
● Высшая Математика. Лекци...
● Темы курсовых работ (укр...
● Пример использования мно...
● Теория графов плюс бонус...
● Сортировка Хоара (быстра...

    10 ЛУЧШИХ ФАЙЛОВ
● Эконометрика
● Таблица производных
● Шпаргалка по высшей мате...
● Математические формулы
● Гмурман. Теория вероятно...
● Таблица интегралов
● Таблицы неопределенных и...
● Программирование на язык...
● Программирование на Си (...
● Программирование на язык...


     
 
Карта программистов

Конструктор информеров



На сайте всего: 3
Посетителей: 3
Пользователей: 0

Создать сайт бесплатно
 БИБЛИОТЕКА УЧЕБНЫХ МАТЕРИАЛОВ 

ГЛАВНАЯ » БИБЛИОТЕКА » КОНКУРСЫ PRIMAT(a) » КОНКУРС ПРОГРАММ [ ДОБАВИТЬ ]

В лесу родилась елочка... версия для програмистов
Begin Лес.елочка.create(); While not Лес.елочка.dead do Begin лес.елочка.age := лес.елочка.age+1; if зима or лето then begin лес.елочка.plain := true; лес.елочка.color := cl_green; end; метель.filename:=’D:MusicNSYNC - Bye Bye Bye.mp3’; метель.open; sleep(1000); метель.play; мороз.укутать(лес.елочка); GetMessage(H, лес.елочка.handle, 0, 0); if h.uint = wm_замерзла then dead := true; end; лес.заяц.create; лес.заяц.трусливый := true; лес.заяц.color := cl_gray; x := лес.елочка.left; y := лес.елочка.top; While x Begin лес.заяц.left := x; inc(x); лес.заяц.top := y + round( abs(sin(x*pi/180)*10) ); end; Winexec(’wolf3d.exe /evil’,0); лес.елочка.cuttoclipboard; Праздник.pastefromclipboard; Праздник.елочка.skin.loadfromfile(’нарядная.jpg’); For i:=1 to SizeOf(Праздник.елочка.радость) do Прадзник.Дети.Настроение + Праздник.елочка.радость; End.


Просмотров [ 2103 ]  ●  07.12.09  ●   Рейтинг  [ 100% ]


Комментариев: [ 1 ]

0  
Bella  ● 31.01.10
Да......жестокая програмка!!!!!




  Ваше Имя  



   





Украинская Баннерная Сеть