Bagaimana program pascal dari tampilan output 4 + 4 + 4 + 4 = ..

Kasus ini adalah pertanyaan dari Fikri Alatas.

Pembahasan :

Dengan melihat output seperti itu, berarti program akan menjumlahkan angka 4 sebanyak n kali sekaligus menjumlahkan dan menampilkan hasilnya.

Dalam program, ada 4 buah variable yang dideklarasikan di awal program.

1. Variabel n untuk menentukan berapa kali perulangan dilakukan untuk menjumlahkan angka 4. Nilai n akan diinput dari keyboard.
2. Variabel i digunakan untuk menghitung banyaknya perulangan mulai dari i=1 hingga i=n.  Nilai awal i=1.
3. Variabel a adalah variable untuk menyimpan angka 4.
4. Variabel j digunakan untuk menjumlahkan nilai a setiap kali perulangan dilakukan. Nilai awalnya j=0.

Program pascalnya adalah sebagai berikut :

uses crt;
var n,i,j,a : integer;

begin
clrscr;
write('Tentukan n = ');readln(n);
j:=0;i:=1; a:=4;
     while i<=n do
      begin
         write(a);
          j:=j + a;
        if i         else write(' = ');
          i:=i+1;
      end;
      write(j);
      readln;
end.

Output program

Demikian program pascal untuk output penjumlahan angka 4.  Semoga bisa membantu anda.

Terima kasih.