10 REM IL MIO SECONDO PROGRAMMA IN BASIC 20 REM WWW.VALOROSO.IT 30 INPUT "COME TI CHIAMI";A$ 40 PRINT 50 PRINT "SCRIVI IL TUO PESO:" 60 INPUT "PRIMA DELLE FERIE";P1 70 INPUT "ADESSO";P2 80 PRINT 90 IF P2>P1 THEN PRINT "MI SPIACE, " A$ ", TEMO DOVRAI METTERTI A DIETA!": PRINT "HAI MESSO SU" STR$(P2-P1) "KG." 100 IF P2<=P1 THEN PRINT "OTTIMO, " A$ ", NON HAI MESSO PESO!"