program small $($output$)$;

var

i:integer;

a:array$[1..\mathrm{.}3]$ of integers;

procedure p$($x$,$y: integer$)$;

begin

x:$=$x$+$y;

y:$=$x$+$y

end;

begin

for i:$=1$ to $3$ do a$[$i$]$:$=1$;

i:$=1$;

p$($i$,$a$[$i$])$;

write$($i$,$a$[$i$],$a$[2].$a$[3])$;

end

give output for this program for following parameter passing methods

a$)$pass by value

b$)$pass by value result

c$)$pass by reference

d$)$pass by namemy answer a$)1123$

b$)2323$

c$)2323$

d$)2343$

please check these answers$//$