Вывести на экран все трёхзначные числа,кратные 13 в обратном порядке- QBasic(Бейсик)

FOR i = 999 TO 100 STEP -1
    IF i MOD 13 = 0 THEN PRINT i;
NEXT

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

Leave a Comment