Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.01.28;
Скачать: [xml.tar.bz2];

Вниз

разобрать число   Найти похожие ветки 

 
anton773 ©   (2007-01-07 22:18) [0]

Вопрос на засыпку: Есть число например "4563" как его разобрать на числа например "4"  "5"  "6"  "7" Единственное что приходить на ум это  преобразовать число в строку и уже строку разобрать на запчасти. Может есть более изящьный вариант


 
try   (2007-01-07 22:38) [1]

Этим вопросом можно засыпать первоклассника. А вот пятиклассника вряд ли - он знает десятичную систему счисления.


 
anton773 ©   (2007-01-07 22:50) [2]


> Этим вопросом можно засыпать первоклассника. А вот пятиклассника
> вряд ли - он знает десятичную систему счисления.

вопрос не правильно понят Мне нужны отдельные цыфры из этого числа,а не разложить его на множители


 
Степан   (2007-01-07 22:50) [3]

Да делить число на 10, потом умножать на 10 и вычислять разницу


 
имя   (2007-01-07 22:51) [4]

Удалено модератором


 
Anatoly Podgoretsky ©   (2007-01-07 22:54) [5]

> anton773  (07.01.2007 22:50:02)  [2]

Ну сказали же, что задача для первого, максимум второго класса, в том числе тем решением, что ты привел.


 
Anatoly Podgoretsky ©   (2007-01-07 22:55) [6]

> Степан  (07.01.2007 22:50:03)  [3]

Количество вариантов займет не одну страницу.


 
anton773 ©   (2007-01-07 22:59) [7]


> Да делить число на 10, потом умножать на 10 и вычислять
> разницу

Тогда уж проще преобразовать число в строку выдернуть каждый символ и уже каждый символ обратно преобразовать в число например StrToINT()


 
anton773 ©   (2007-01-07 23:04) [8]


> в том числе тем решением, что ты привел.

Так я и хотел узнать более элегантное решение


 
LapGod   (2007-01-07 23:25) [9]

Более "элегантное" решение это делить с остатком на 10. Вот примерный план :

//a - исходное число
m := a;
while m > 0 do
begin
k := m mod 10;//очередная цифра
m := m div 10;
end;

Все цифры будут идти с конца.


 
LapGod   (2007-01-07 23:30) [10]

Более "элегантное" решение это делить с остатком на 10. Вот примерный план :

//a - исходное число
m := a;
while m > 0 do
begin
k := m mod 10;//очередная цифра
m := m div 10;
end;

Все цифры будут идти с конца.


 
LapGod   (2007-01-07 23:30) [11]

Более "элегантное" решение это делить с остатком на 10. Вот примерный план :

//a - исходное число
m := a;
while m > 0 do
begin
k := m mod 10;//очередная цифра
m := m div 10;
end;

Все цифры будут идти с конца.


 
LapGod   (2007-01-07 23:32) [12]

Извиняюсь. Больше никогда не буду нажимать кнопку "обновить".


 
ors_archangel ©   (2007-01-07 23:48) [13]


> Извиняюсь. Больше никогда не буду нажимать кнопку "обновить".

Не ты должен извиняться, а разработчики сайта должны перед тобой извиниться, а лучше сайт исправить... а! бесполезно :(


 
sniknik ©   (2007-01-08 00:40) [14]

> а лучше сайт исправить...
это интересно как? разрыв между постами(9-10) 5мин, это что запретить второй раз с IP постить меньше чем через 10? а найдется такой что и так умудрится "обновить" то на полчаса добавить?

в обновлении всегда вторая посылка идет, браузер даже предупреждает, если нажал подтверждение значит хотел, и нечего ограничители навешивать, любые, потому, что то, что одних ограничивает другим (причем основной массе) работать мешает.


 
anton773 ©   (2007-01-08 08:12) [15]

To LapGod Спасибо!



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.01.28;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.48 MB
Время: 0.043 c
15-1168196200
Tirael
2007-01-07 21:56
2007.01.28
и почему спам... вопрос то совершенно отдельный...


9-1142783756
Чичиков
2006-03-19 18:55
2007.01.28
Какой формат моделей использовать?


8-1149166922
h8394E
2006-06-01 17:02
2007.01.28
IDirectDrawSurface.Blt (Подскажите флаги)


15-1168298335
Робот Вертер
2007-01-09 02:18
2007.01.28
Программистов в 2020 году заменят роботы


2-1168759824
Garacio
2007-01-14 10:30
2007.01.28
запись в один .ini состояния MainForm и Form2





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский