Question

Как будет выглядеть данная программа в переводе с паскаля на с++ var A:
Integer;
var x, zp :real;
label m;
begin
writeln('введите зарплату');
readln(x);
m: writeln ('введите кол-во часов >38');
readln(a);
if a<38 then goto m;
zp:=x+1.5*(A-38)*(x/38);
writeln ('работник получит ', zp,' рублей')
end.

int main(int argc, char* argv[])
{
float x1,x2,x3,y1,y2,y3;
float S,P;
float st1,st2,st3,p;
cout«"koordinata 1: "; cin»x1»y1;
cout«"koordinata 2: "; cin»x2»y2;
cout«"koordinata 3: "; cin»x3»y3;
st1=sqrt(((x2-x1)*(x2-x1))+((y2-y1)*(y2-y1)));
st2=sqrt(((x2-x3)*(x2-x3))+((y2-y3)*(y2-y3)));
st3=sqrt(((x3-x1)*(x3-x1))+((y3-y1)*(y3-y1)));
P=st1+st2+st3;
p=P/2;
S=sqrt(p*(p-st1)*(p-st2)*(p-st3));
cout«"Perimetr= "«P«endl«"Ploshad'= "«S;
_getch();
return 0;
}