Имеем такую схему:

и вот такую функцию:
y(n*T)=a*x(n*T)+a*x((n-1)*T)-b*y((n-1)*T)
a=T/T+2*R*C
b=T-2*R*C/T+2*R*C
T=1 секунде
Амплитудная характеристика:

Нужно получить график в реальном времени, синусоиду, состоящую из 100 точек и частотой от 0,01 Гц до 0,5 Гц получаемую с приборов.
Наброски программы:
- Код: Выделить всё
- r:='M2T5E';
 send(adress,r,status);
 delay(1000);
 enter(r,255,1,adress,status);
 s:=copy(r,3,12);
 val(s,x[i],code);
 initialize(21,0);
 i:=3; j:=1;
 intergraph(i,j,'C:\TP6\BGI');
 line(x1,y1,x2,y2);
 putpixel(x1,y1,red);
 cleardevice;


