zadacha299.BAS

{* Задача299 *}

REM basic

' Найти сумму целых пол-х чисел, больших 20, меньших 100 и кратных 3.


For i = 21 To 99 Step 3
    s = s + i
Next
PRINT s
End