From: Королев В. <vic...@ya...> - 2016-04-12 16:51:30
|
<div>F>D копирует целое число с арифметического стека на стек, причем без округления </div><div>Возможный вариант умножить результат в n 10 раз, на n требуемое количество разрядов после запятой</div><div>К примеру до 3-х знаков:</div><div>10 DS>F \ или 10. D>F</div><div>3 DS>F \ или 3. D>F</div><div>F/ </div><div>F10* F10* F10*</div><div>FINT \ если нужно округление по установленным правилам</div><div>F>D \ Далее использовать по назначению</div><div>\ или вывод в форматном виде</div><div>( d -- adr u ) SWAP OVER DABS <# # # # [CHAR] . HOLD #S ROT SIGN #></div><div> </div><div>12.04.2016, 18:42, "витя ерыгин" <vi...@ma...>:</div><blockquote type="cite"><br />Необходимо получить результат от деления двух целых чисел в виде двойного числа<br />10 0 d>f<br />3 0 d>f<br />f/<br />f>d<br /> выдаёт 3 0, а не 3 333...<br /><br /><br /><br />-- <br />Виктор Ерыгин ,<p>------------------------------------------------------------------------------<br />Find and fix application performance issues faster with Applications Manager<br />Applications Manager provides deep performance insights into multiple tiers of<br />your business applications. It resolves application problems quickly and<br />reduces your MTTR. Get your free trial!<br /><a href="https://ad.doubleclick.net/ddm/clk/302982198;130105516;z">https://ad.doubleclick.net/ddm/clk/302982198;130105516;z</a></p>,<p>_______________________________________________<br />Spf-dev mailing list<br /><a href="mailto:Sp...@li...">Sp...@li...</a><br /><a href="https://lists.sourceforge.net/lists/listinfo/spf-dev">https://lists.sourceforge.net/lists/listinfo/spf-dev</a></p></blockquote> |