read (x); read (y); z := y*y; write (x+z)