Составьте программу построения графика зависимости y=x*sin(x) на отрезке [-20; 20]

program parabola;

uses crt,graphabc;

const

w=800;

h=600;

x0=400;

y0=300;

k=20;

var i,x1,y1: integer;

x,y: real;

begin setwindowsize(w,h);

line(0,y0,w,y0);

line(x0,0,x0,h);

textout(x0+5,y0+5, '0');

textout(w-10,y0+5, 'x');

textout(x0+5,10,'y');

i: =k;

while i< w do

begin

line (i,y0-5,i,y0+5);

i: =i+k;

end;

i: =k;

while i< h do

begin line(x0-5,i,x0+5,i);

i: =i+k;

end;

x: =-20;

while x< =20 do

begin

y: =x*sin(x);

x1: =round(x0+k*x);

y1: =round(y0-k*y);

setpixel(x0,y1,clblue);

setpixel(x1,y0,clblue);

setpixel(x1,y1,clred);

x: =x+0.01;

end;

savewindow('grafic.bmp');

end.

долна получится такая парабола как на картинке  

  программную систему можно рассматривать как множество классов, позволяющих создавать, получать доступ и изменять коллекции данных, называемых объектами

вызов объектом компонента – основная базисная операция оо программирования

они могли обозначать союзы, знаки препинания, слова в один слог.