Contoh Pemrograman Array tentang Data Siswa

Hallo sobat blogger :) Pada malam ini saya akan share Contoh Pemrograman Array tentang Data siswa, sobat sudah tau Array kan ?? Array bukan Alay ya :D hehe Array biasa digunakan untuk mempermudah membuat variable definisi array sendiri adalah koleksi (kumpulan) sejumlah objek atau variable yang memiliki Index dan Tipe Data yang sama, saya harap sobat sudah tau apa itu array dari pengertiannya sampai akhirnya :D hehe

Contoh Scripte C++ Pemrograman Array tentang Data Siswa

Contoh Pemrograman Array Data Siswa XTKJ-B  yang telah saya buat :

PROGRAM Veriztiarta_Array;
Uses Crt;
 Var
  Nis_Siswa : ARRAY[1..10] OF String;
  Nama_Siswa : ARRAY[1..10] OF String;
  Alamat_Siswa : ARRAY[1..10] OF String;
 A, N : Integer; 
Begin
 ClrScr;
  Writeln('--------------------');
  WriteLn('Program Data Siswa');
  WriteLn('--------------------');
  Write('Masukan Banyak Data : ');
 ReadLn(N);
WriteLn;
FOR A := 1 TO N DO 
Begin
 WriteLn('Data Ke -',A:3);
  Write('Nis Siswa        : '); ReadLn(Nis_Siswa[A]);
  Write('Nama Siswa       : '); ReadLn(Nama_Siswa[A]);
  Write('Alamat Siswa     : '); ReadLn(Alamat_Siswa[A]);
End;
WriteLn;
 ClrScr;
  WriteLn('Daftar Siswa XTKJ-B');
  WriteLn('==============================================================');
  WriteLn('| No |    NIS Siswa    |    Nama Siswa    |      Alamat      |');
  WriteLn('==============================================================');
FOR A := 1 TO N DO
Begin
 GoToXY(1,A+4); Write('|');
 GoToXY(3,A+4); Write(A)
 GotoXY(6,A+4); Write('|');
 GotoXY(8,A+4); Write(Nis_Siswa[A]);
 GotoXY(24,A+4); Write('|');
 GotoXY(26,A+4); Write(Nama_Siswa[A]);
 GotoXY(43,A+4); Write('|');
 GotoXY(45,A+4); Write(Alamat_Siswa[A]);
 GotoXY(62,A+4); Write('|');
End;
Writeln;
 WriteLn('==============================================================');
 Writeln('                                    -[author by : veriztiarta]-');
ReadLn;
End.

Hasilnya (tampilan) dari data diatas seperti gambar berikut :

Kalau sobat males membuatnya sobat bisa Download programnya di bawah ini :

 

Cara membukanya udah tau kan ,lewat Turbo Pascal atau bisa lewat Open With Notepad 

Yah itulah yang dapat saya bagikan untuk sobat walau simple banget :D hehe , sekian artikel yang dapat saya update di Blog Mata Cyber ini semoga dapat bermanfaat bagi sobat semua ,sampai bertemu kembali di artikel selanjutnya .. Jangan lupa komentarnya ya :D hehe

Tweet