Tag: formatting Decimal Numbers

Routine to Format Decimal Numbers

10 REM ROUTINE TO FORMAT DECIMALNUMBERS ROUNDED OFF TO TWO PLACES AND RIGHT JUSTIFIED BY BOB HUELSDONK 15 REM 4/27/78 20 REM APPLE PUGETSOUND PROGRAM LIBRARY EXCHANGE 6708 39TH AVE SW SEATTLE, WA. 98136 70 FOR I • 1 TO 10: READ A: P= A : GOSUB 6000 75 PRINT P$: NEXT 80 END 90 DATA 56.2,23456.1,5,1.186,345.70,23,678.0123,-99999.889,.2389,789S67 100 REM 110 REM ” A.’ WAS CHANGED TO ‘P’ 120 REM TO KEEP THE SUBROUTINE 130 REM ANONYMOUS. 140 REM WORKS FOR…