-- This program takes three numbers from the standard input
-- and outputs the largest of these three numbers

INT a:
INT b:
INT c:
INT max:

SEQ
  stdin ? a -- Read in the first number
  stdin ? b -- Read in the second number
  stdin ? c -- Read in the third number
  max := a  -- Let the maximum value equal the first number
  IF
    b > max
      max := b-- If the second number is greater than the max value then
               -- the new max value should be equal to the second number
  IF
    c > max
      max := c-- If the third number is greater than the max value then
               -- the new max value should be equal to the third number
  stdout ! max