/* REXX */                                                                      
NUMERIC DIGITS 9          /* Default. */                                        
NUMERIC FORM SCIENTIFIC   /* Default. */                                        
                                                                                
SAY 'Numeric form is' FORM()'.'                                                 
x = 12345678900           /* 11 digit number. */                                
SAY x + 0                                                                       
SAY                                                                             
                                                                                
NUMERIC FORM ENGINEERING  /* Exponent divisible by 3. */                        
SAY 'Numeric form is' FORM()'.'                                                 
SAY x + 0