listati da GWbasic

esci listagwbasic.htm

 

100 REM BASE2
110 CLS
120 PRINT"PRECISIONE DOPPIA CDBL(N)........";:PRINT CDBL(454.67)
130 PRINT"PRECISIONE SINGOLA CSNG(N)........";:PRINT CSNG(12345678912#)
140 PRINT"GENERATORE DI SUONO BEEP ..........";:BEEP
150 PRINT
160 PRINT"DA STRINGA A INTERO CVI(2 BYTE)....";:PRINT CVI("123456789")
170 PRINT"DA STRINGA A PREC.SEM. CVS(4 BYTE)....";:PRINT CVS("123456789")
180 PRINT"DA STRINGA A PREC.DOP. CVD(8 BYTE)....";:PRINT CVD("123456789")
190 PRINT"MEMORIA DISPONIBILE FRE(0).........";:PRINT FRE(0)
200 PRINT"PREMI TASTO INKEY$........."
210 IF INKEY$="" THEN 210
220 PRINT"USO DI INPUT CON VIRGOLA "
230 INPUT"USO DI VIRGOLA:SCRIVI NUMERO:",A
240 PRINT"USO DI INPUT CON ; "
250 INPUT"USO DI ; SCRIVI NUMERO:";A