Найти все двухзначные числа которые делятся на n или содержат цифру n- QBasic(Бейсик)

CLS
INPUT "Vvedite N : ", n
FOR i = 10 TO 99
    IF (i MOD n = 0) OR (i \ 10 = n) OR (i MOD 10 = n) THEN PRINT i;
NEXT

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

Leave a Comment