Является ли произведение цифр 3-значного числа - вопрос №35988190 от dkanya0055 31.12.2021 22:20

Question

Информатика: Является ли произведение цифр 3-значного числа четным? (работа с оператором while—wend)

dkanya0055 · Answer

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...