teman-teman terima kasih
sudah selesai masalahnya

regards
nyoman

--- In [email protected], "Nyoman Darsana" <dars...@...> wrote:
>
> 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_cgate@> 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
>   > >
>   > > 
>   > >
>   >
>


Kirim email ke