-----------------------------------

person

Wed Mar 09, 2005 6:00 pm


Integer overflow in real8 div.

-----------------------------------

how do i solve this problem when it says: "Integer overflow in real8 div."???

thanx in advance


-----------------------------------

Flikerator

Wed Mar 09, 2005 6:06 pm


Re: Integer overflow in real8 div.

-----------------------------------

how do i solve this problem when it says: "Integer overflow in real8 div."???

thanx in advance

Can I see the code? It might help to solve it ^^

Usually when I get overflow it is because the number is an int and its too large.


-----------------------------------

person

Wed Mar 09, 2005 6:07 pm



-----------------------------------


var num : int
var ans : real := 1
var a := 0
get num
for x : 1 .. num
    ans := ans * x
end for
for decreasing x : num .. 1
    a := 0
    for decreasing y : num .. 1
        if (ans / x) / y = (ans / x) div y then % this line overflows
            a += 1
        end if
    end for
    if a = num then
        ans := ans / x
    end if
end for
var num : int
var ans : real := 1
var a := 0
get num
for x : 1 .. num
    ans := ans * x
end for
for decreasing x : num .. 1
    a := 0
    for decreasing y : num .. 1
        if (ans / x) / y = (ans / x) div y then
            a += 1
        end if
    end for
    if a = num then
        ans := ans / x
    end if
end for



-----------------------------------

Flikerator

Wed Mar 09, 2005 6:10 pm



-----------------------------------

I get an error message...Var previously declared.


-----------------------------------

person

Wed Mar 09, 2005 6:12 pm



-----------------------------------

D'oh (pressed ctrl+v twice)

anyways


var num : int
var ans : real := 1
var a := 0
get num
for x : 1 .. num
    ans := ans * x
end for
for decreasing x : num .. 1
    a := 0
    for decreasing y : num .. 1
        if (ans / x) / y = (ans / x) div y then
            a += 1
        end if
    end for
    if a = num then
        ans := ans / x
    end if
end for



-----------------------------------

person

Fri Mar 11, 2005 3:29 pm



-----------------------------------

does anyone have any ideas to solving this problem??


-----------------------------------

ssr

Fri Mar 11, 2005 3:52 pm



-----------------------------------

srry no idea
but may be the type of input 
just an idea
 8)


-----------------------------------

Cervantes

Fri Mar 11, 2005 4:30 pm



-----------------------------------

Try changing

if (ans / x) / y = (ans / x) div y then

to

if (ans / x) / y = (ans / x) / y then

.


-----------------------------------

person

Fri Mar 11, 2005 4:49 pm



-----------------------------------

i did that so that i know that its an integer


-----------------------------------

Cervantes

Fri Mar 11, 2005 5:12 pm



-----------------------------------

So, that if statement is trying to determine whether ans / x / y is a whole number?
Lol, sorry, I really should have thought a bit about what I suggested in my above post.  
Okay, what about:

        if index (realstr (ans/x/y, 0), ".") > 0 then %if ans/x/y contains no decimals
            a += 1
        end if


btw, your avatar is really large.  Please scale it down.


-----------------------------------

person

Fri Mar 11, 2005 6:34 pm



-----------------------------------

thanx Cervantes!!!

btw: hows this for the size of my avatar?


-----------------------------------

MysticVegeta

Fri Mar 11, 2005 9:51 pm



-----------------------------------

What are you trying to do btw?  :wink:


-----------------------------------

Token

Fri Mar 11, 2005 10:34 pm



-----------------------------------

yah person i like this avatar better then the other ones u were experimenting with today


-----------------------------------

person

Sat Mar 12, 2005 11:05 am



-----------------------------------

What are you trying to do btw?

ECOO #1 (it works now)