30 November 2011

Algoritma Menghitung Jumlah Bilangan Genap, Ganjil dan Prima

Judul     :  Algoritma menampilkan jumlah bilangan genap, ganjil dan prima
Spesifikasi : {Menampilkan jumlah bilangan genap, ganjil dan prima dari 1-100  dengan data nawal dan nakhir diinputkan dari keyboard. Menampilkan jumlah bilangan genap, ganjil dan prima ke layar monitor}
Deklarasi:
       i,j : integer
       nawal, nakhir : integer
       jumgenap, jumganjil, jumprima : integer
       prima : boelan
Deskripsi:
       Read(“Masukkan Nilai Awal”, nawal)
       Read(“Masukkan Nilai Akhir”, nakhir)
       jumgenapß0
              For ißnawal to nakhir do
                     If i mod 2 ß 1 then
                           jumgenapßjumgenap+1
                     Endif
              Endfor

              jumprimaß0
              For ißnawal to nakhir do
                     If i mod 2 ß 0 then
jumganjilßjumganjil+1                                   Endif
              Endfor

              For ißnawal to i ß nakhir do
                     primaßfalse
                  if iß2
                     primaßtrue
                  else
                     for jß2 to j<i do
                       if i mod jß0
                          primaßfalse
                          exitfor
                       else
                          primaßtrue
                       endif
                     endfor
                  endif
                if (prima) then
                     jumprimaßjumprima+1
                Endif
              endfor
              Write(“Jumlah Bilangan Genap”, jumgenap)
              Write(“Jumlah Bilangan Ganjil”, jumganjil)
              Write(“Jumlah Bilangan prima”, jumprima)

0 komentar:

Posting Komentar

Silakan tinggalkan komentar Anda....