$s=$Input.Split("\n") $a = $s.Split(" ")[0] $b = $s.Split(" ")[1] $c = $s.Split(" ")[2] $d = $s.Split(" ")[3] $x=@() $y=@() $z=@() foreach($i in 0..2){ $x+=$b[$i]-$a[$i] $y+=$c[$i]-$a[$i] $z+=$d[$i]-$a[$i] }