Program Bilangan Genap

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

Kira-kira begini penyelesaiannya :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

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, pascal menghitung bilangan genap, menghitung jumlah bilangan genap pascal, mencari bilangan genap prosedur dan perulangan pascal, for end bilangan genap, sebuah prosedur untuk menghitung jumlah elemen list yang genap?, contoh program java bilangan genap, buatlah algoritma flowchart dan translet saurce code pascal untuk menampilkan sederatan bilangan genap dari 10 sampai 30, angka bilangan prima 1-100.