Compiler Design

 What is the value of X printed by the following program ?

program COMPUTE ( input, output );

var X : integer ;

procedure FIND ( X: real ) ;
             begin
                  X : = sqrt ( X ) ;
                                  end ;
              begin
                            X : = 2
                          FIND ( X )
                          writeln ( X )
             end