/* REXX This little beastie is by Matt Wheaton, obviously an anti-social type... */ say 'Enter value for number' pull number a=Right(97.2,1e00,b) b=Left(30.65,a*8**0,a) if number == b/a then say okie dokie else say get outa here