Sekilas Tentang Soal Algoritma

LATIHAN ALGORITMA DAN PEMOGRAMAN

PUTRI SAKINAH

MI 1B

BP 1101091008

1.       Buatlah algoritma untuk menghitung faktorial sebuah bilangan dengan menggunakan fungsi dan prosedur

2.       Buatlah algoritma untuk menghitung permutasi dan kombinasi dengan menggunakan fungsi dan prosedur

3.       Buatlah fungsi dan prosedur untuk menentukan apakah suatu bilangan bulat bersifat ganjil/genap. Jika genap, maka fungsi menghasilkan nilai 1 dan 0 untuk selainnya

JAWABAN

1.        { Fungsi Faktorial}

Kamus :

i, fak,n ; integer

Algoritma

Fak ß 1

If (n<=0)

Fakß0

Else

For i ß 1 to n do

Fakß fak*n

iß i+1

{end for}

Return (fak)

{end algoritma}

Algoritma { Menghitung nilai Faktorial }

Kamus :

I,n ; integer

fak ; integer

Algoritma

input (n)

Fak ß 1

If (n<=0)

Fakß0

Else

For i ß 1 to n do

Fakß fak*n

iß i+1

output (factorial)

{end algoritma}

2.        

{ Fungsi Faktorial}

Kamus :

i, fak,n ; integer

Algoritma

Fak ß 1

If (n<=0)

Fakß0

Else

For i ß 1 to n do

Fakß fak*i

iß i+1

{end for}

Return (fak)

{end algoritma}

{Fungsi permutasi}

 (x : integer, y : integer)  ß real

Kamus :

  p : real

Algoritma

  p ß fak (x) / fak (x-y)

  return (p)

{end Algoritma}

{Fungsi kombinasi}

 (x : integer, y : integer)  ß real

Kamus

  c : real

Algoritma

  c <- fak(x) / (fak(y) * fak(x-y))

 return (kombinasi)

{end Algoritma}

{fungsi Kombinasi_Permutasi}

Kamus :

  a, b : integer

  fungsi kombinasi (a,b;integer)à integer

  fungsi permutasi (a,b;integer)à integer

Algoritma

input (a,b)

  output (permutasi (n,r))

  output (kombinasi (n,r))

return (kombinasi_permutasi)

{end Algoritma}

{ Algoritma  Faktorial}

Kamus :

i, fak,n ; integer

Algoritma

Fak ß 1

If (n<=0)

Fakß0

Else

For i ß 1 to n do

Fakß fak*i

iß i+1

{end for}

output (fak)

{end algoritma}

{Algoritma kombinasi}

 (x : integer, y : integer)  ß real

Kamus

  c : real

Algoritma

  c <- fak(x) / (fak(y) * fak(x-y))

output (c)

{end Algoritma}

Algoritma { Kombinasi_Permutasi}

Kamus :

  a, b : integer

  faktorial :  integer

  permutasi, combinasi : real

  fungsi fak (x : integer)

  fungsi p (x : integer, y : integer)

  fungsi c (x : integer, y : integer)

Algoritma

  input (a)

  input (b)

  fak  ßfaktori (a)

  p <- permut (a, b)

  c<- kombinasi (a, b)

  output (faktorial)

  output (permutasi)

  output (kombinasi)

{end Algoritma}

3.        Fungsi {Bilangan Bulat }

(x : integer)  ß integer

Kamus

  x : integer

Algoritma

  If x mod 2 = 0 then

    x ß 1

  Else x mod 2 ≠ 0

    xß0

  {end If}

  return (x)

{end Algoritma}

Algoritma{Bilangan bulat}

Kamus

  a, b : integer

Algoritma

  Input (a)

  b <- hasil (a)

  output (b)

{end Algoritma}