Спок, я бы не был так уверен, что дождаться перевода — быстрее. Кроме того, (нами) будет переведена только первая часть, а это довольно мало.

Точно знаю одно - с позиции расходования энергии и времени, экономнее дождаться перевода.

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

Не с той позиции меряешь. А елочку покажи.

Есть 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.

а потом все равно...
Праздник.Free;
dead:=true;
end.

прикольно!!! а по ссылке кстати не заходит почемуто - 404 нот фаунд

http://www.tolkuchka.dsip.net/index.php?showtopic=5920
вот, должен зайти

теперь открылось прикольно

Я пошутил, не та ссылка, то есть та, конечно, но на 2.
http://karataev.nm.ru/jukeprogr.html
Это другой подход.

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