ROUND OFF

by Paul Taylor & Carl Whitwell



This letter must have taken a while to reach me 'cos it was addressed

to Task Force! But I'm going to print it anyway, 'cos it gives us two

useful rounding functions. Function one rounds off a number to the

nearest integer and takes account of numbers such as 2.5 where it

gives a result of three. The functions should be included in your

programs like this:



100 DEF FN r(v)=INT v+CODE CHR$ (v-INT(v))

110 DEF FN p(v,n)=FN r(v*10^n)/10^n



Function two, which uses Function one, rounds off a number to a

required number of decimal places. Have a butchers at the examples

below:



Command			Output

PRINT FN r(2.4)		2

PRINT FN r(2.5)		3

PRINT FN p(123.0678,3)	123.068

PRINT FN p(123.0674,3)	123.067



These routines should speed up of almost any program which uses lots

of floating point maths, and needs to round off numbers. Yes, at last

you can write that Basic spreadsheet program you've always dreamed of

... (Oh brother! Ed)