apa kira2 ini bisa digunakan ?
if (a^b) > c then
sisanya=(a ^ b) mod c
else
sisanya=(a^b)
endif
salam,
nyom2
----- Original Message -----
From: gunartha
To: [email protected]
Sent: Tuesday, May 18, 2010 11:12 AM
Subject: [programmer-vb] Re: mencari sisa pembagian
Teman-teman,
Terima kasih tanggapannya, setelah saya goolge saya dapat contoh
penyelesainnya seperti di bawah :
x = (4 ^ 13) mode 497
x = 445
kira-kira kalau dalam bahasa VB nya gimana ya ?
The example b = 4, e = 13, and m = 497 is presented again. The algorithm
passes through step 3 thirteen
times:
e' = 1. c = (1 * 4) mod 497 = 4 mod 497 = 4.
e' = 2. c = (4 * 4) mod 497 = 16 mod 497 = 16.
e' = 3. c = (16 * 4) mod 497 = 64 mod 497 = 64.
e' = 4. c = (64 * 4) mod 497 = 256 mod 497 = 256.
e' = 5. c = (256 * 4) mod 497 = 1024 mod 497 = 30.
e' = 6. c = (30 * 4) mod 497 = 120 mod 497 = 120.
e' = 7. c = (120 * 4) mod 497 = 480 mod 497 = 480.
e' = 8. c = (480 * 4) mod 497 = 1920 mod 497 = 429.
e' = 9. c = (429 * 4) mod 497 = 1716 mod 497 = 225.
e' = 10. c = (225 * 4) mod 497 = 900 mod 497 = 403.
e' = 11. c = (403 * 4) mod 497 = 1612 mod 497 = 121.
e' = 12. c = (121 * 4) mod 497 = 484 mod 497 = 484.
e' = 13. c = (484 * 4) mod 497 = 1936 mod 497 = 445.
The final answer for c is therefore 445, as in the first method.
--- In [email protected], Sigit <p_cg...@...> wrote:
>
> ni cman kira2 aja..
> x= 729^78
> y= x mod 3335
>
> On 18/05/2010 7:26, gunartha wrote:
> >
> > Yth VBier,
> >
> > Mohon bantuannya saya punya masalah dengan hasil pangkat yg besar dan di
> > mod kan.
> > Contoh begini :
> > saya mau mencari nilai x adalah sisa hasil pembagian dari :
> > x = (729 ^ 78) mod 3335
> >
> > kenapa muncul erorr "stack overflow"
> >
> > Terima kasih
> > regards
> > gunartha
> >
> >
> >
>
