Является ли произведение цифр 3-значного числа четным? - вопрос №59879653 от peindragneel11 17.02.2021 13:21

Question

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

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