1
1
Fork 0
mirror of https://github.com/QB64-Phoenix-Edition/QB64pe.git synced 2024-09-09 18:40:18 +00:00
QB64-PE/tests/compile_tests/const/const_float.bas

28 lines
563 B
QBasic
Raw Normal View History

$CONSOLE:ONLY
CONST const__single! = 32E+0
CONST const__single_exp! = 32E+2
CONST const__single_neg_exp! = 32E-10
CONST const__double# = 32D+0
CONST const__double_exp# = 32D+2
CONST const__double_neg_exp# = 32D-20
CONST const__float## = 32F+0
CONST const__float_exp## = 32F+2
CONST const__float_neg_exp## = 32F-10
PRINT const__single!
PRINT const__single_exp!
PRINT const__single_neg_exp!
PRINT
PRINT const__double#
PRINT const__double_exp#
PRINT const__double_neg_exp#
PRINT
PRINT const__float##
PRINT const__float_exp##
PRINT const__float_neg_exp##
SYSTEM