Есть у нас на форуме такая рубрика "Приколы от админа". Но вот решил один из приколов выложить в новостях. Дальше приведена простенькая программка на Паскале. Компилируется без проблем, все правильно по синтаксису. Но не работает... Попробуйте найти ответ - почему? Аналогичные задачки можно найти на нашем форуме. (Эта программка когда-то попала в мою коллекцию с какого-то сайта). Высказывайтесь!

var x1,y1,x2,y2,dx,dy:integer;
 d:real;
begin
 x2:=520;y2:=200;
 x1:=320;y1:=200;
 dx:=x2-x1;
 dy:=y2-y1;
 d:=dx*dx+dy*dy;{???}
 d:=sqrt(d);{!!!}
end.


2008-10-18 • Просмотров [ 7858 ]