Алгоритъм цифром -> словом

[VED]

Някой може ли да помогне с алгоритъм за преобразуване на произволно реално число от цифром в словом.

[Raid]

Линкът, който съм дал в цитираната от Pat тема е за решение на конкpemeн проблем с таблица на Excel. Това върши ли работа или ти трябва алгоритъм за преобразуване, който ще реализираш с алгоритмичен език?

[VED]

Това за съжеление няма да мога да го използвам, но все пак благодаря.



Трабва да го напиша да работи под Delphi.

[Raid]

<blockquote id="quote"><font size="1" id="quote"><b id="quote">quote:</b id="quote"></font id="quote"><table border="0" id="quote"><tr id="quote"><td class="quote" id="quote"><font size="1" id="quote">Това за съжеление няма да мога да го използвам, но все пак благодаря.



Трабва да го напиша да работи под Delphi.



<div align="right">Originally posted by VED*-*17/06/2004*:* 12:47:02</div id="right">

</td id="quote"></tr id="quote"></table id="quote"></blockquote id="quote"><font size="2" id="quote"></font id="quote">



Ами значи функция на Pascal ще ти свърши работа. Ако ми остане време - днес, ако не - утре...

[Geo_BG]

@VED



Имам такава функция, писана преди 10-на години - и до днес си работи перфектно. Не е на Паскал/Делфи, но освен алгоритъма вероятно ще може да се ползва и 80-90% от кода. Функцията обработва суми до 999 999 999.99 лв., като поддържа параметър за род на валутата (за да изпише правилно ЕДИН лев и ЕДНА марка).



Ако не си си решил проблема, дай някакъв мейл, на който да ти пратя кода.



Geo

[wireman]

Постни го тук, де

[Black Adder]

Е от това http://georgi.unixsol.org/programs/num2bgmoney.php по-точно и правилно преобразуване - няма

[VED]

E-mail: vediko@abv.bg



Мисля, че кода на "Black Adder" ще успея да го подкарам и под Delphi.

Благодаря.

[williekl]

<blockquote id="quote"><font size="1" id="quote"><b id="quote">quote:</b id="quote"></font id="quote"><table border="0" id="quote"><tr id="quote"><td class="quote" id="quote"><font size="1" id="quote">Линкът, който съм дал в цитираната от Pat тема е за решение на конкpemeн проблем с таблица на Excel. Това върши ли работа или ти трябва алгоритъм за преобразуване, който ще реализираш с алгоритмичен език?



<div align="right">Originally posted by Raid - 17/06/2004 : 12:18:06</div id="right">

</td id="quote"></tr id="quote"></table id="quote"></blockquote id="quote"><font size="2" id="quote"></font id="quote">



за съжаление вече го няма там [V]

[ru-boy]

Там си е, бе човек, я провери още един път.

[williekl]

<blockquote id="quote"><font size="1" id="quote"><b id="quote">quote:</b id="quote"></font id="quote"><table border="0" id="quote"><tr id="quote"><td class="quote" id="quote"><font size="1" id="quote">Там си е, бе човек, я провери още един път.



<div align="right">Originally posted by ru-boy - 28/01/2005 : 12:35:22</div id="right">

</td id="quote"></tr id="quote"></table id="quote"></blockquote id="quote"><font size="2" id="quote"></font id="quote">



датата вика "The directory/file does not exist" , намира го с търсачката и пак същото вика :-(

[Pat]

Ако говориш за екселските файлове, дай мейл да ти ги пратя. Запазил съм ги.

[ru-boy]

<blockquote id="quote"><font size="1" id="quote"><b id="quote">quote:</b id="quote"></font id="quote"><table border="0" id="quote"><tr id="quote"><td class="quote" id="quote"><font size="1" id="quote"><blockquote id="quote"><font size="1" id="quote"><b id="quote">quote:</b id="quote"></font id="quote"><table border="0" id="quote"><tr id="quote"><td class="quote" id="quote"><font size="1" id="quote">Там си е, бе човек, я провери още един път.



<div align="right">Originally posted by ru-boy - 28/01/2005 : 12:35:22</div id="right">

</td id="quote"></tr id="quote"></table id="quote"></blockquote id="quote"><font size="2" id="quote"></font id="quote">



датата вика "The directory/file does not exist" , намира го с търсачката и пак същото вика :-(



<div align="right">Originally posted by williekl - 28/01/2005 : 13:04:37</div id="right">

</td id="quote"></tr id="quote"></table id="quote"></blockquote id="quote"><font size="2" id="quote"></font id="quote">При мен се отваря всеки път, от доставчика на Интернет ти е проблема.

[williekl]

<blockquote id="quote"><font size="1" id="quote"><b id="quote">quote:</b id="quote"></font id="quote"><table border="0" id="quote"><tr id="quote"><td class="quote" id="quote"><font size="1" id="quote">Ако говориш за екселските файлове, дай мейл да ти ги пратя. Запазил съм ги.



<div align="right">Originally posted by Pat - 28/01/2005 : 13:15:21</div id="right">

</td id="quote"></tr id="quote"></table id="quote"></blockquote id="quote"><font size="2" id="quote"></font id="quote">



много благодаря.

willie@bhc.orbitel.bg

[SAGE]

За Delphi:

http://free.data.bg/ndeu/components/slovom.pas