{* Задача151 *}

REM basic

' Вычислить сумму чисел кратных A на интервале от W до Q включительно


CLS
INPUT "Ввод интервала, затем кратность", w, q, a
For I=w To q Step a
S=S+I
PRINT "Ответ = ", S