read (x0); read (x1); y := 17-(x0!=x1); write (y)