Re: Turbo Pascal question

hi john!

john typed:

> I need the powers because i store the reversed digits in an array, and
> then want to store them in a variable.

do u have to store the digits in a temp array? homework?

if so lets have a look at your own code:

your loop:

for j:= 1 to i do
     begin
     array_element:= temp_array[j];
     result:= result+ array_element* exp( (digit_amount- j)* ln(10) );
     end;


why not simply make it like this:

for j := digit_amount downto 1 do
  result:= result * 10 + temp_array[j];

or if u want or have to keep the structure of the loop:

var multi : integer;

multi := 1;
for j:= 1 to i-1 do multi := multi * 10;
for j:= 1 to i do
     begin
     array_element:= temp_array[j];
     result:= result+ array_element * multi;
     multi := multi div 10
     end;


greetz
jo

-- 
http://radio789.net.ms
- Radio 789 - We play it ALL
Radiostream: http://stream789.net.ms