Program Data Mahasiswa

Apr 15, 2009 10 Comments by Sahabat

Berikut ini contoh program data mahasiswa di pascal kiriman Dianita Wahyu Kurniasih

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
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]

Pascal
Sahabat

Tentang Penulis

Penulis adalah sahabat-sahabat yg menyumbang tulisan di nusinau.com untuk dimuat dengan bijaksana. Silakan kirim tulisannya ke nusinau[at]gmail[dot]com atau ke admin[at]nusinau[dot]com. Butuh diskusi cepat? colek di twitter @nusinau

10 Responses to “Program Data Mahasiswa”

  1. Robert says:

    terima kasih sudah membantu informasinya,tapi saya mohon untuk gambar formnya,maklum baru pemula,terima kasih

  2. rizal says:

    punya program pascal 1000 line gk??

  3. ekiq says:

    tolong dung kirimin syntak yang logikanya seperti ini “Jika ditekan Y maka programnya akan di ulang , dan jika T maka programnya berlanjut “.

  4. syahbana says:

    bagaimana pak hasil programnya mohon bapak tunjukkan gambarannya. bagaimana pak saya dapat memeperoleh programnya.. thanks mohon atas penjelasannya.

    • Nu says:

      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.

  5. msandi says:

    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])

  6. Syarief Sabri says:

    asik..

Leave a Reply

You must be logged in to post a comment.