Program Bilangan Genap

Dec 26, 2009 3 Comments by Nu

Sesuai dengan pertanyaan mas/mbak takirey tentang bagaimana menyimpan bilangan genap ke dalam suatu array sebanyak input user.

Kira-kira begini penyelesaiannya :

uses wincrt;
var genap : array[1..100] of integer;
    a, b, jum : integer;
begin
  a := 0;
  b := 2;
  write('Jumlah bilangan genap : ');readln(jum);
  while a <> jum do begin
    inc(a);
    genap[a] := b;
    b := b + 2;
  end;
  writeln;
  writeln('Hasil yang disimpan di array : ');
  for b := 1 to jum do
    writeln('Bilangan genap ke-',b,' : ',genap[b]);
end.

Kata Kunci

bilangan genap, program pascal bilangan genap, Algoritma dan flowchart bilangan genap 1-100, membuat program genap menggunakan algoritma, membuat transposition cipher pada vb, mencari bilangan genap dan ganjil dengan menggunakan flowchart dan pseudocode menggunakan java, penulisan algoritma menggunakan bahasa natural menampilkan bilangan genap dan ganjil, program bilangan genap dengan pascal, program bilangan genap menggunakan pascal, program menghasilkan bilangan genap sebanyak 10 bilangan melalui Qbasic.

Pascal
Nu

Tentang Penulis

Mantan Tentor SD dan SMP, mantan Guru SMA, mantan Dosen PT, mantan IT Helper, mantan Programmer, mantan IT Analyst.... Sekarang... Berusaha jadi pengangguran, masih muda, masih belajar.... Jangan panggil saya pak!... Butuh diskusi cepat? colek di twitter @nusinau

3 Responses to “Program Bilangan Genap”

  1. eko says:

    kalo deret diatas itu dibuat urutan terbalik gmn ya?makasi

  2. Tanya says:

    Mas bagaimana kalau caranya membuat jumlah bilangan prima dan non prima.
    Output nya :
    masukan jumlah:4
    ———————–
    prima non prima
    1 4
    2 6
    ———————–
    jmlh prima:2
    jml nonprima:2

  3. tia sopyan hidayat says:

    nambah ilmu :D makasih..

    mampir yah.. goo.gl/27Ehmi

Leave a Reply