RosettaCodeData/Task/Even-or-odd/ALGOL-68/even-or-odd.alg
2023-07-01 13:44:08 -04:00

8 lines
369 B
Text

# Algol 68 has a standard operator: ODD which returns TRUE if its integer #
# operand is odd and FALSE if it is even #
# E.g.: #
INT n;
print( ( "Enter an integer: " ) );
read( ( n ) );
print( ( whole( n, 0 ), " is ", IF ODD n THEN "odd" ELSE "even" FI, newline ) )