![]() |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
![]() ![]() |
![]() |
Strip |
![]()
Сообщение
#1
|
Гость ![]() |
???Помогите решить задачу! Пожалуйста!!!
Вводится натуральное число N. Определить номер минимальной цифры этого числа |
oleg309 |
![]()
Сообщение
#2
|
![]() профи ![]() ![]() Группа: Пользователи Сообщений: 109 Пол: Мужской Репутация: ![]() ![]() ![]() |
Получи остаток используя mod 10
-------------------- Тело, находящееся в состоянии покоя, стремится смотреть телевизор.
|
fms |
![]()
Сообщение
#3
|
![]() Бывалый ![]() ![]() ![]() Группа: Пользователи Сообщений: 195 Пол: Женский Репутация: ![]() ![]() ![]() |
2oleg309
оригинально объяснил.. ;D как будто после этой строчки ему стало намного понятней.. :-/ PS^поковыряйся по форуму.. тут много задач на выделение цифр из числа было.. ну а определить минимальное и потом его номер наверно будет не оч. сложно.. -------------------- непонимающая..
|
oleg309 |
![]()
Сообщение
#4
|
![]() профи ![]() ![]() Группа: Пользователи Сообщений: 109 Пол: Мужской Репутация: ![]() ![]() ![]() |
Вот пример программы которая отсекает последнюю цифру числа и выводи на экран (в твоём случае это не надо но для примера пойдёт):
Код While A>0 do begin B:=a mod 10; Dec(A,B); A:=A div 10; Writeln('B'); End. Теперь просто необходимо сравнить эти числа и определить его номер (или разряд?) Сообщение отредактировано: volvo - -------------------- Тело, находящееся в состоянии покоя, стремится смотреть телевизор.
|
fms |
![]()
Сообщение
#5
|
![]() Бывалый ![]() ![]() ![]() Группа: Пользователи Сообщений: 195 Пол: Женский Репутация: ![]() ![]() ![]() |
я так понимаю номер цифры в числе..)) просто в эту штуку еще счетчик вставить..
-------------------- непонимающая..
|
oleg309 |
![]()
Сообщение
#6
|
![]() профи ![]() ![]() Группа: Пользователи Сообщений: 109 Пол: Мужской Репутация: ![]() ![]() ![]() |
А может использовать FOR...? И с какой стороны считаь с лева на прово или наоборот, поэтому наверно лучше выводить не номер , а разряд?
-------------------- Тело, находящееся в состоянии покоя, стремится смотреть телевизор.
|
fms |
![]()
Сообщение
#7
|
![]() Бывалый ![]() ![]() ![]() Группа: Пользователи Сообщений: 195 Пол: Женский Репутация: ![]() ![]() ![]() |
как ты фор использовать хочешь?! ты ведь не знаешь сколько цифр в числе..
если делить то естественно получится справа налево. потом счетч. подсч. кол-во цифр и запомнит номер с минимальн. и потом из общ. кол-ва вычесть номер с минимальной цифрой и прибавить 1..) вот и будет настоящий номер мин. цифры. -------------------- непонимающая..
|
oleg309 |
![]()
Сообщение
#8
|
![]() профи ![]() ![]() Группа: Пользователи Сообщений: 109 Пол: Мужской Репутация: ![]() ![]() ![]() |
Lim = High(LongInt); For i:=1 to Lim do.....!!!!! >:(
-------------------- Тело, находящееся в состоянии покоя, стремится смотреть телевизор.
|
trminator |
![]()
Сообщение
#9
|
Четыре квадратика ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 579 Пол: Мужской Репутация: ![]() ![]() ![]() |
Код var n: integer; i, min, minn, ost : shortint; begin readLn(n); min:=10; i:=0; while n > 0 do begin inc(i); ost:=n mod 10; n:=n div 10; if ost < min then begin min:=ost; minn:=i end; end; writeLn(minn,'-тый разряд минимальный. Он равен ', min); end. Цитата ты ведь не знаешь сколько цифр в числе при желании можно взять десятичный логарифм - это и будет кол-во цифр - 1. Но это уже извращение. Цитата While A>0 do begin B:=a mod 10; Dec(A,B); A:=A div 10; Writeln(B); End. dec(a, B) здесь явно лишнее. Зачем это делать если все равно потом отбрасываешь последнюю цифру Сообщение отредактировано: volvo - -------------------- Закон добровольного труда Зимерги:
Люди всегда согласны сделать работу, когда необходимость в этом уже отпала |
fms |
![]()
Сообщение
#10
|
![]() Бывалый ![]() ![]() ![]() Группа: Пользователи Сообщений: 195 Пол: Женский Репутация: ![]() ![]() ![]() |
;D
в общем Стрип если захочет, то допишет что ему надо.. поковыряется по форуму и сделает.. ![]() -------------------- непонимающая..
|
trminator |
![]()
Сообщение
#11
|
Четыре квадратика ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 579 Пол: Мужской Репутация: ![]() ![]() ![]() |
Что тут дописывать - вроде у меня прога рабочая... или на худой конец почти рабочая
Цитата Lim = High(LongInt); For i:=1 to Lim do.....!!!!! Зачем делать цикл на два миллиарда итераций? (все-все, молчу, последний наезд ![]() -------------------- Закон добровольного труда Зимерги:
Люди всегда согласны сделать работу, когда необходимость в этом уже отпала |
oleg309 |
![]()
Сообщение
#12
|
![]() профи ![]() ![]() Группа: Пользователи Сообщений: 109 Пол: Мужской Репутация: ![]() ![]() ![]() |
Цитата ;D в общем Стрип если захочет, то допишет что ему надо.. поковыряется по форуму и сделает.. ![]() А оно ему надо? Чё-то у него никаких вопросов не возникает, или мы тут зря рамсим?! ;) -------------------- Тело, находящееся в состоянии покоя, стремится смотреть телевизор.
|
trminator |
![]()
Сообщение
#13
|
Четыре квадратика ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 579 Пол: Мужской Репутация: ![]() ![]() ![]() |
Все, уже флуд пошел!
-------------------- Закон добровольного труда Зимерги:
Люди всегда согласны сделать работу, когда необходимость в этом уже отпала |
![]() ![]() |
![]() |
Текстовая версия | 19.02.2025 12:01 |