Найти сумму целых положительных чисел, кратных 6 и меньших 150 — QBasic(Бейсик)

disel 
FOR i =6 TO 150
    IF i MOD 6 =0 THEN s=s+i
NEXT i
PRINT s