как найти m=v*p если v=0.6m кубических как же нати плотность гранита решити пожалуста

Определите число протонов в ядрах атомов следующих элементов:Na,P,Ca,Cr,Ag,I

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,88 г получен оксид углерода (IV)массой 0,88 г и вода массой 0,3 г после превращения всего брома,содержащегося в навеске,в бромид серебра получено 3,76 г AgBr. плотность паров вещества по водороду равна 94, определите формулу исследуемого вещества?