10 REM # SUMMA.BAC
20 ; 'Programmet r{knar ut summan av alla tal'
30 ; 'mellan tv} tal som du v{ljer.'
40 ; 
50 ; 'Fr}n '; : INPUT F
60 ; 'Till '; : INPUT T
70 FOR I=F TO T
80 S=S+I
90 NEXT I
100 ; : ; 'Summan:'S