HELP!ЗАДАНИЕ В ПАСКАЛЕ!!!!!!!! код проги рисующей параболу Var g,h:integer; x,y:real; x0,y0,xm,ym,Mx,My:integer; begin g:=detect; InitGraph(g,h,'');begin line(0,round(getmaxY/2),GetmaxX,round (GetMaxy/2));line (round (GetMaxX/2...
HELP!ЗАДАНИЕ В ПАСКАЛЕ!!!!!!!! код проги рисующей параболу Var g,h:integer; x,y:real; x0,y0,xm,ym,Mx,My:integer; begin g:=detect; InitGraph(g,h,'');
begin line(0,round(getmaxY/2),GetmaxX,round (GetMaxy/2));
line (round (GetMaxX/2),0,round(GetmaxX/2),GetmaxY); end;
For xm:=20 to 620 do Begin x:=(xm-x0)/Mx; y:=X*X; ym:=round(y0-y*My); PutPixel(xm,ym,15); End; Readln; End. что означает Begin x:=(xm-x0)/Mx; y:=X*X; ym:=round(y0-y*My); ? Зачем использовать его в коде? __________ Mx, My-масштабы соответственно по осям x и y, которые показывают число пикселей в одной физической единице, x, y- физические координаты точки, xm, ym- машинные координаты точки, x0, y0- машинные координаты начала физической системы координат.
Гость
Ответ(ы) на вопрос:
ГостьТак это у тебя высчитывается пропорциональный коэффициент между положением точки на графике и отображением её на графическом экране. То есть на графике точка параболы с координатами (2;2), а на графическом экране (220,200).
Не нашли ответ?
Похожие вопросы