skip to main | skip to sidebar

Sedikit Ilmu Yang Berguna

  • Entries (RSS)
  • Comments (RSS)
  • Home
  • About Us
  • Archives
  • Contact Us

Tuesday, May 15, 2012

algoritma penjumlahan deret pecahan

Posted by randiadma at 7:28 AM

Algoritma Penjumlahan Deret Pecahan
{Menjumlahkan deret dengan bentuk pecahan 1-1/2+1/3-1/4+…1/n. Nilai n dibaca, ditentukan terlebih dahulu}

Deklarasi :
jumlah  : real       {jumlah deret}
n          : integer  {penyebut pada suku terakhir, n >0}
i           : integer  {suku ke-i}
p          : integer  {penyebut suku ke-i}

Algoritma :
read(n)
jumlah ? 0
i ? 1   {suku pertama}
p ? 1  {penyebut suku pertama}
while p = n do
                        if i mod 2 = 1 then   {suku ke-i ganjil}
                                    jumlah ? jumlah + 1/p
                        else
                                    jumlah ? jumlah – 1/p
                        endif
                        i ? i+1    {tinjau suku berikutnya}
                        p ? p + 1    {tinjau penyebut suku berikutnya}
endwhile
{p > n}
write(jumlah)
Email This BlogThis! Share to X Share to Facebook

0 comments:

Post a Comment

Newer Post Older Post Home
Subscribe to: Post Comments (Atom)

Sponsored

  • banners
  • banners
  • banners
  • banners

Blog Archive

  • ▼  2012 (61)
    • ►  June (2)
    • ▼  May (9)
      • REFLEKSI MINGGU KESEPULUH ALPRO
      • program deret fibonacci
      • program c++ simpul
      • REFLEKSI MINGGU KESEMBILAN ALPRO
      • Program volume bola
      • algoritma dan program faktorial
      • REFLEKSI MINGGU KEDELAPAN ALPRO
      • program titik tengah jeliot
      • algoritma penjumlahan deret pecahan
    • ►  April (19)
    • ►  March (27)
    • ►  February (1)
    • ►  January (3)
  • ►  2011 (44)
    • ►  December (2)
    • ►  November (11)
    • ►  October (1)
    • ►  September (5)
    • ►  May (1)
    • ►  April (16)
    • ►  March (8)

Followers

Clock Widgets

About Me

My photo
randiadma
Saya Mahasiswa UAD, Jurusan Teknik Informatika,
View my complete profile

My Fuckkn Facebook

Randy Mix Emax

Buat Lencana Anda

Followers

Powered by Blogger.

Blog Archive

  • ▼  2012 (61)
    • ►  June (2)
    • ▼  May (9)
      • REFLEKSI MINGGU KESEPULUH ALPRO
      • program deret fibonacci
      • program c++ simpul
      • REFLEKSI MINGGU KESEMBILAN ALPRO
      • Program volume bola
      • algoritma dan program faktorial
      • REFLEKSI MINGGU KEDELAPAN ALPRO
      • program titik tengah jeliot
      • algoritma penjumlahan deret pecahan
    • ►  April (19)
    • ►  March (27)
    • ►  February (1)
    • ►  January (3)
  • ►  2011 (44)
    • ►  December (2)
    • ►  November (11)
    • ►  October (1)
    • ►  September (5)
    • ►  May (1)
    • ►  April (16)
    • ►  March (8)
 

© 2010 My Web Blog
designed by DT Website Templates | Bloggerized by Agus Ramadhani | Zoomtemplate.com