Tag: array

  • Program Penilaian Mahasiswa

    Halo semua. Komang kirim ya. yang ini contoh program array, untuk menghitung nilai rata-rata nilainya selama 1 semester. source codenya seperti di bawah ini: program penilaian_MHS;{program ini untuk melihat hasil nilai mahasiswa selama 1 semester} uses wincrt; var nama : array[1..20] of string; tugas, uts, uas, presensi : array[1..20] of integer; rata : array[1..20] of…

  • Program Contoh Bulan

    Contoh program bulan di pascal kiriman Dianita Wahyu Kurniasih Program Contoh_Bulan; uses wincrt; const Bulan :array[1..12] of string = (‘Januari’,’Februari’,’Maret’,’April’,’Mei’,’Juni’,’Juli’, ‘Agustus’,’September’,’Oktober’,’November’,’Desember’); var NoBulan:integer; begin clrScr; write (‘Masukkan nomor bulan: ‘ ); readln (NoBulan); write (‘Nama bulan ke- ‘ ,NoBulan , ‘ adalah ‘, Bulan [NoBulan]); readln; end. Dianita Wahyu Kurniasih [email protected]

  • Erika Array

    Contoh penggunaan array di pascal kiriman Erika Silvia Sihombing Uses Wincrt; Var bilangan : array[1..50] of integer; begin ClrScr; Bilangan[1]:=3; Bilangan[2]:=29; Bilangan[3]:=30; Bilangan[4]:=31; Bilangan[5]:=23; writeln(‘nilai variabel bilangan ke 3=’,bilangan[3]); readln; end. Erika Silvia Sihombing [email protected]

  • Program Input Nilai Mahasiswa

    Seorang dosen memberi tugas mahasiswanya untuk membuat listing program pascal dalam rangka praktik materi array. Inti tugasnya adalah membuat program database sederhana konversi nilai mahasiswa, dimana pada pertama kali BAK menginput : Jumlah data mahasiswa Nim mahasiswa Nama mahasiswa Nilai pertama Nilai kedua Hasil yang didapat adalah data mahasiswa, rata2 nilai dan konversi ke nilai…

  • Contoh Array

    Pada source array berikut ini, dibuat suatu program untuk menyimpan array sebanyak 100 (max), pada awalnya program akan meminta jumlah data yang akan di masukkan. Dalam memberikan nilai pada array, akan dilakukan pengacak-an serta pengecekan nilai yang dihasilkan. Nilai yang dihasilkan kemudian ditampilkan. uses wincrt; var X : array[1..100] of integer; a,b,n,r : integer; beda…