Информатика, опубликовано 2018-08-22 23:20:56 by Гость

Данно натуральное число. а) Определить его максимальную цифру. б) Определить его минимальную цифру. QBasic 4.0

Ответ оставил Гость

CLS
INPUT"A="; S$
L =LEN(S$)
max =VAL(RIGHT$(S$, 1))
min =VAL(RIGHT$(S$, 1))
FOR i =1 TO L
K =VAL(MID$(S$, i, 1))
IF Kmin = K
END IF
IF K> max THEN
max = K
END IF
NEXT i
PRINT"max ="; max
PRINT "min ="; min

Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.

Форма вопроса доступна на полной версии этой страницы.