Страница 2 из 2

Добавлено: 11 янв 2005, 23:24
Athari
Спок, я бы не был так уверен, что дождаться перевода — быстрее. ;) Кроме того, (нами) будет переведена только первая часть, а это довольно мало.

Добавлено: 12 янв 2005, 12:52
Spok
Точно знаю одно - с позиции расходования энергии и времени, экономнее дождаться перевода.

Хм, а могет мне тоже попереводить? Например на c++? Весело будет, я как то увидел такой перевод "В лесу родилась елочка" на object pascal.

Добавлено: 12 янв 2005, 22:55
Athari
Точно знаю одно - с позиции расходования энергии и времени, экономнее дождаться перевода.
Не с той позиции меряешь. ;) А елочку покажи. :)

Добавлено: 13 янв 2005, 08:58
Spok
Есть 2 Варианта: серьезный и шуточный. По первому дам ссылку
http://karataev.nm.ru/jukeprogr.html. Ну это для грамотных людей.

А второй ниже
В лесу родилась елочка...
program Елочка;
Begin
Лес.елочка.create();
While not Лес.елочка.dead do
Begin
лес.елочка.age := лес.елочка.age+1;
if зима or лето then
begin
лес.елочка.plain := true;
лес.елочка.color := cl_green;
end;
метель.filename:='D:\Music\NSYNC - 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.

Добавлено: 13 янв 2005, 10:16
Kovur
а потом все равно...
Праздник.Free;
dead:=true;
end.

Добавлено: 13 янв 2005, 16:25
Kotenok_gaff
прикольно!!! а по ссылке кстати не заходит почемуто - 404 нот фаунд

Добавлено: 13 янв 2005, 20:38
Spok

Добавлено: 13 янв 2005, 22:25
Kotenok_gaff
:) теперь открылось :) прикольно :)))

Добавлено: 14 янв 2005, 08:42
Spok
Kotenok_gaff писал(а)::) теперь открылось :) прикольно :)))
Я пошутил, не та ссылка, то есть та, конечно, но на 2.
http://karataev.nm.ru/jukeprogr.html
Это другой подход.

PS:
Странно, по этой ссылке у меня заходит, а по той, что выше - нет.