FreePascal.ru

я же говорил что у моего приятеля(у него такой же компьютер, такая же винда, такая же версия FPC) программа работает исправно, и не рисует подобное... В том то и парадокс что у нас с ним всё тоже самое по части железа, винды, компилятора...

а вообще графики - это фазовый портрет( угла от угл ...

http://radikal.ru/F/s44.radikal.ru/i104 ... f.jpg.html
это вывод
http://s39.radikal.ru/i084/0811/fd/09e3688d3b64.jpg
это окно появляется после



компелирую FTP

Запускал твою программу, но всё происходит по-старому...полосы не исчезают...((((

program oo;
uses crt, graph;

const
gamma=0.0;
w0=1;
n=1000;
dt=0.01;
var
fi,v,a0,t,E,E0,fi0,v0,fi_n,v_n,fi1,v1:extended;
i,gd,gm: integer;


function fun(v,fi:extended):extended;
begin
fun:=-2*gamma*v-sqr(w0)*sin(fi);
end;


begin

gd:=detect ...

Запукаю программу в FPC, программа должна рисовать 2 графика... и она их рисует, НО местами идут полосы, в которых ничего не отображается... т.е. представьте себе: график начерчен нормально, а потом мы берём в руки стирашку и стираем в некоторых местах...и получаем то что у меня на экране...
Если ...