Является ли произведение цифр 3-значного числа четным? (Работа с оператором WHILE—WEND)
CLSm = 100WHILE m < 999 f$ = STR$(m) f$ = MID$(f$, 2) h1$ = MID$(f$, 1, 1) h2$ = MID$(f$, 2, 1) h3$ = MID$(f$, 3, 1) k = VAL(h1$) * VAL(h2$) * VAL(h3$) IF k MOD 2 = 0 THEN PRINT h1$; "*"; h2$; "*"; h3$; "="; k END IF m = m + 1WEND
Извините, а другого решения нет?
а какое надо?
это же с оператором While - Wend