Program vektorduplazo; var a,b,c,d:real; procedure vd(x1,y1:real;var x2,y2:real); begin x2:=2*x2-x1; y2:=2*y2-y1 end; begin readln(a); readln(b); readln(c); readln(d); vd(a,b,c,d); writeln(a:10:2,b:10:2,c:10:2,d:10:2); readln end.