Đọc chương trình sau và cho biết kết quả hiện lên trên màn hình?Var a, b: integer; Procedure P (var x : integer; var y: int

Đọc chương trình sau và cho biết kết quả hiện lên trên màn hình?
Var a, b: integer; 

Procedure P (var x : integer; var y: integer); 

        Begin 

                      Writeln (x, ‘’, y); 

                     X:= x*x; 

                      Y:= y*10; 

                      Writeln (x, ‘’, y); 

        End; 

Begin 

a:=1; b:=10; 

P(a, b); 

Writeln (a, ‘’, b); 

readln 

End.