Вопрос по информатике:
Дано шестизначное целое число N, в десятичной записи которого нет нулей. Необходимо определить минимальное трехзначное число, которое можно увидеть в десятичной записи числа N. Например, для N=915391 - результат 153
Пожаловаться
- 26.09.2017 02:15
- Информатика
- remove_red_eye 9846
- thumb_up 16
Ответы и объяснения 1
Var i,n,m,j,t:integer;d:array[1..6] of integer;beginn:= 951259;repeat m:= m + 1;d[m]:= n mod 10;n:= n div 10;until n = 0;writeln(d);for i:=1 to m do for j:=2 to m do beginif d[j-1]> d[j] then begint:= d[j-1]; d[j-1]:= d[j]; d[j]:= t;end;end;for i:=1 to 3 do write(d[i]);end.
Пожаловаться
- 27.09.2017 17:02
- thumb_up 38
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы