Berikut ini contoh program data mahasiswa di pascal kiriman Dianita Wahyu Kurniasih
Program data_mhs;
uses wincrt;
type mahasiswa = record
nim : string[8];
nama : string[25];
umur : integer;
end;
var
data:mahasiswa;
begin
clrScr;
writeln ('Masukkan data diri Anda : ' );
write ('Nim : ' );readln(data.Nim);
write ('Nama : ' );readln(data.Nama);
write ('Umur : ' );readln(data.Umur);
writeln; {Memasukkan baris kosong}
{Menampilkan data yang telah dimasukan}
writeln ('Beikut ini informasi data diri yang telah anda masukkan : ');
writeln ('Nim : ' , data.Nim);
writeln ('Nama : ' , data.Nama);
writeln ('Umur : ' , data.Umur);
readln ;
end.
Dianita Wahyu Kurniasih
[email protected]
10 responses to “Program Data Mahasiswa”
terima kasih sudah membantu informasinya,tapi saya mohon untuk gambar formnya,maklum baru pemula,terima kasih
tinggal copy+paste ke turbo pascal for windows …
run.
kelihatan dah gambar formnya … :)
punya program pascal 1000 line gk??
ada
tolong dung kirimin syntak yang logikanya seperti ini “Jika ditekan Y maka programnya akan di ulang , dan jika T maka programnya berlanjut “.
coba lihat di artikel lain. ada kok contohnya
bagaimana pak hasil programnya mohon bapak tunjukkan gambarannya. bagaimana pak saya dapat memeperoleh programnya.. thanks mohon atas penjelasannya.
waduh…. masih muda belia saya…. jangan panggil pak… :p
download aja mas, atau cari aja ke rental.. hehehe
turbo pascal for windows
copy listing program diatas
run
selesai mas.
bro, kalau input datanya menggunakan array tapi ditampilkan dalam sebuah Form di delphi7 dimana dalam inputnya kita menggunakan Edit.text, dimana pemasukan datanya menggunakan Buttum1.caption := input.
Kemudian menampilkannya hanya memanggil inputan indek keberapa seperti writeln(z[a]);
sebenarnya ini diperlukan jika membuat data dari beberapa Field di sebuah table dimana dalam beberapa Fieldnya iitu nanti dijadikan satu utk mengetahui nilai angka yang Max / Min / Rata2.Tolong bagi2 ilmunya dong, thx ([email protected])
asik..