program foo; var x : int; procedure p(y: int); begin y:=y+1y:=y end begin x:=2; p(x); print (x); end In the given program, what would be the output assuming a. Paas by value b. Pass by reference