Главная страница
    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.47 MB
Время: 0.042 c
15-1168296414
SSE
2007-01-09 01:46
2007.01.28
С каких процессоров началсь поддержка SSE1 ?


15-1167335262
Real
2006-12-28 22:47
2007.01.28
Что мешает Гуглу реализовать внутрифайловый поиск?


2-1168713385
Влад
2007-01-13 21:36
2007.01.28
onMessage


2-1168523899
Derty_Edd
2007-01-11 16:58
2007.01.28
VCL - TnT (разницы нет)


15-1167641289
vidiv
2007-01-01 11:48
2007.01.28
Помогите найти песню





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский