Cara Mengganti Gambar Background Blog di Blogger/Blogspot

Kamis, 07 Juni 2012

CONTOH PROGRAM ARRAY PADA PASCAL

program ak; uses crt; var a,n,jumlah_nilai : integer; nilai : array [1..10] of integer; nilai_rata : real; begin clrscr; writeln ('======================='); writeln (' program aku '); writeln ('======================='); writeln; write ('masukkan banyak data =');readln(n); for a := 1 to n do begin write ('nilai ke- ',a,' = ');readln (nilai[a]); end; writeln; nilai_rata := 0; jumlah_nilai := 0; for a := 1 to n do begin jumlah_nilai := jumlah_nilai + nilai[a]; writeln ('nilai ke- ',a,' = ',nilai[a]); end; nilai_rata := jumlah_nilai / n; writeln ('hasil nya'); writeln ('================================='); writeln ('jumlah nilai : ',jumlah_nilai); writeln ('nilai rata rata : ',nilai_rata:5:2); readln; end.

Read more: http://pelajaran-blog.blogspot.com/2009/03/membuat-daftar-isi-pada-blog.html#ixzz32ys1P3AT

0 komentar:

Posting Komentar