CLS
LPRINT "programma scritto con QBASIC"
LPRINT "si forniscono valori funzionali di numero inserito"
INPUT "scrivi un numero ", x
LPRINT "assoluto............", ABS(x)
LPRINT "intero..............", INT(x)
LPRINT "segno...............", SGN(x)
LPRINT "casuale.............", RND(x)

LPRINT "quadrato............", x ^ 2
LPRINT "radice quadrata.....", SQR(x)
LPRINT "cubo................", x ^ 3
LPRINT "logaritmo naturale..", LOG(x)
LPRINT "logaritmo decimale..", LOG(x) / LOG(10)
LPRINT "esponenziale........", EXP(x)
g = x * 3.14 / 180
LPRINT "radianti............", g
LPRINT "seno................", SIN(g)
LPRINT "coseno..............", COS(g)
LPRINT "tangente............", TAN(g)
LPRINT "arcotangente........", ATN(g)

programma scritto con QBASIC
si forniscono valori funzionali di numero inserito
scrivi un numero 16
assoluto............         16
intero..............         16
segno...............         1
casuale.............         .7055475
quadrato............         256
radice quadrata.....         4
cubo................         4096
logaritmo naturale..         2.772589
logaritmo decimale..         1.20412
esponenziale........         8886111
radianti............         .2791111
seno................         .2755013
coseno..............         .9613007
tangente............         .2865922
arcotangente........         .2721843



ritorna