• 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- машинные координаты начала физической системы координат.

Ответы 1

  • Так это у тебя высчитывается пропорциональный коэффициент между положением точки на графике и отображением её на графическом экране. То есть на графике точка параболы с координатами (2;2), а на графическом экране  (220,200).    

  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years