Program Pascal Record

Zaman sekarang ga perlu susah yah buat mengingat semua kejadian yang pernah kita lewatin. Kita bias simpan melaui bentuk poto, video, ataupun suara. Postingan kali ini gue ga bahas tentang video,poto,ataupun suara kali ini gue mau berbagi ilmu yang gue dapat newh tentang program pascal menggunakan record untuk menyimpan data, program kali ini tentang data mahasiswa. CHECK THIS OUT MOTHERF*UCKER!!! program xxx; uses wincrt; type mahasiswa = record nama : string; npm : string; jurusan : string; end; var mhs: array [1..5] of mahasiswa; x : integer; begin clrscr; for x:= 1 to 5 do begin; write('masukan nama :'); readln(mhs[x].nama); write('masukan npm'); readln(mhs[x].npm); write('masukan jurusan'); readln(mhs[x].jurusan); end; begin; clrscr; writeln('nama':8,'|','npm':5,'|','jurusan':8,'|'); for x:=1 to 5 do writeln(mhs[x].nama:8,mhs[x].npm:5,mhs[x].jurusan:8) end; end. Pada program di atas akan di lakukan pengulangan sebanyak 5x, karena for control variable dan array gue tentuin 5x (Lihat coding yang berwarna biru). Pada coding tersebut ada tulisan yang berwarna merah, silahkan kawan ganti dengan apa aja yang lo semua pengen, PERLU DI INGAT VARIABEL PUN IKUT TERGANTIKAN!! :)happy