Найти сумму четных чисел на промежутке от А до В — QBasic(Бейсик)

disel
1
2
3
4
5
6
INPUT a
INPUT b
FOR i = a TO b
    IF i MOD 2 = 0 THEN s = s + i
NEXT
PRINT s

Тестирование выполнено в программе QB64 ( Скачать )

Похожие записи/страницы:

Leave a Comment