Question

Что напечатает программа:
Program smak;
Var item:integer;
Prodecure lie(var ia:integer;ya:integer);
Begin
ia:=10*ya;
end;
begin
item:=10;
lie(item,item);
writeln(item);
end.

Answer 1

10

в процедуре число не изменилось