Найти все двузначные числа - VB
Формулировка задачи:
Найти все двузначные числа, равные утроенному произведению своих цифр например (24)
Разработать пользовательскую форму и составить программу в редакторе VB MS Excel.
Решение задачи: «Найти все двузначные числа»
textual
Листинг программы
- REM OTBET: 15, 24
- CLS
- DIM n AS INTEGER
- DIM a AS INTEGER
- DIM b AS INTEGER
- DIM p AS INTEGER
- FOR n = 10 TO 99
- a = n \ 10
- b = n MOD 10
- p = 3 * a * b
- IF n = p THEN PRINT n
- NEXT
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д