Basic в возрастающей последовательности натуральные двухзначные числа,в которых нет одинаковых цифр

elizavetanosova2000 elizavetanosova2000    2   09.06.2019 05:00    0

Ответы
арсен2000 арсен2000  08.07.2020 01:45
CLS
FOR i = 10 TO 98
  IF i \ 10 = i - 10 * (i \ 10) THEN
  ELSE
    PRINT i,
  END IF
NEXT i
ПОКАЗАТЬ ОТВЕТЫ
myyllaas myyllaas  08.07.2020 01:45
Еще один вариант
FOR i = 1 TO 9
    FOR j = 1 TO 9
        IF i <> j THEN PRINT i * 10 + j; " ";
    NEXT j
NEXT i
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика