IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

> Определение цифры по номеру в последовательности двузначных чисел, (Было: Задача с условным оператором)
сообщение
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 17
Пол: Женский
Реальное имя: Настя

Репутация: -  0  +


Вот такая задача: "Даны целое число л (1<=k<=180) и последовательность цифр 10111213...9898, в которой вписаны подряд все двухзначные числа. Определить k-ю цифру"
Помогите мне разобраться и решить эту задачу smile.gif
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
сообщение
Сообщение #2


Гость






AngeLL, все очень просто: все цифры в заданной тобой последовательности - двузначные. Что это значит? То, что ((k - 1) div 2) даст тебе порядковый номер числа в последовательности (начиная с нуля), из которого надо вытянуть первую цифру, если k - нечетное, и вторую - если k - четное...

То есть, делаем:

begin
readln(k);
number := ((k - 1) div 2) + 10; { <-- поскольку последовательность начинается с 10 }
if odd(k)
then writeln(number div 10) { <-- нечетный номер цифры - первая цифра в числе }
else writeln(number mod 10); { <-- четный номер - вторая цифра }
end.
 К началу страницы 
+ Ответить 

Сообщений в этой теме


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 29.03.2024 2:30
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name