// Title : COMAL Example 1 // Author : John Walsh // Date : 15 April 2000 // PRINT "Please enter the first number "; INPUT number_one PRINT "Please enter the second number "; INPUT number_two total := number_one + number_two PRINT "The total is "; total END