read (x0); read (x1); y := (x1+x0)/39; write (y)