var number1, number2, number3, number4 : real

put "Please enter 4 numbers.."
get number1, number2, number3, number4

put "The largest is.."
put max (max(number1, number2), max (number3, number4))