ЗАДАНИЕ В ПАСКАЛЕ!!!!!!!!

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.

 

подскажите пожалуйста, что означает строка For xm:=20 to 620 do? что и зачем она нужна? 

воздух на 1см3 поверхности земли давит весом 1кг 33г.А каким весом давит воздух на площадь 100см3

ответить на 6 вопросов:
1.What kind of summer job would you like to find?

2.How are you going to look for it?

3.What dp you expect to learn from it?
4.Will you do it for money or for other reasons?

5. What are your strong points?

6. What qualifications do you have?

Помогите пожалуйста!!!Мини-сочинение на пословицу семеро одного не ждут

1.) Когда прекратила своё существование Западная Римская империя?

2.) Кем был Марк Тулий Цицерон? ( Варианты ) - А.) оратором. Б.) древнеримским политиком. В.) архитектором. Г.) скульптором.

Пожалуйста помогите! Заранее всем спасибо))))