Tutorial Belajar Pemrograman, membuat game, membuat aplikasi, membuat program, android, game maker, yii, php, CSS, HTML, java, javascript, codeigniter, jquery, Pascal, c++

Saturday, June 30, 2012

Program Record Dengan Pascal - Apa itu record ? Record menurut bahasa kita sehari - hari adalah menyimpan. dengan kata lain Reocord adalah type data yang terstruktur yang merupakan pengelompokan dari beberapa data lainnya yang disimpan dalam sebuah record.
Record dapat di gabungkan dengan array sebagai contoh untuk kali ini saya akan memberikan sedikit contoh program yang menggunakan penggabungan record dan juga array untuk membuat sebuah data mahasiswa sederhana, di bawah ini adalah program data mahasiswa degan record yang bersis data NPM, Nama, Subject ( Mata kuliah ), Quiz (nilai kuis), Midtes(nilai mid semester), Fintes(nilai tes akhir) dan Overall tes (jumlah nilai maha siswa).

program test;
uses crt;

type
tmhs = record
     npm : string[10];
     nama : string[20];
     subject : string[20];
     quiz : byte;
     midtes : byte;
     fintes : byte;
     over : real;
     end;

var

sis : array[1..5] of tmhs;
i,j : integer;
begin
clrscr;
for i := 1 to 5 do
    begin
    write('NPM : '); readln(sis[i].npm);
    write('Nama : '); readln(sis[i].nama);
    write('Subject : '); readln(sis[i].subject);
    write('Nilai Quiz : '); readln(sis[i].quiz);
    write('Nilai Midtest : '); readln(sis[i].midtes);
    write('Nilai Finaltes : '); readln(sis[i].fintes);
         begin
         sis[i].over:=(sis[i].quiz*0.1)+(sis[i].midtes*0.4)+(sis[i].fintes*0.5);
         end;
    writeln;
    end;

for j:=1 to 5 do
    begin
    with sis[j] do begin
    writeln('NPM : ',npm);
    writeln('Nama : ',nama);
    writeln('Subject : ',subject);
    writeln('Overall Value : ', over:5:2);
    writeln;
    end;
end;

readln;
end.

Program Record Dengan Pascal anda sekarang sudah selesai, baca juga tutorial program pascal lainnya.

Terima Kasih Telah Mengunjungi Blog Sederhana Ini.

Di Mohon Apabila Anda Ingin Mengcopas Artikel Pada Blog ini Cantumkan URL Sumber.

Sebagai Pengunjung Yang Baik Anda Dapat Meninggalkan Komentar di Blog Sederhana Ini.

Share this post

3 komentar

  1. postingan yang bagus tentang Program Record Dengan Pascal

    ReplyDelete
  2. Permisi
    bsa mnta tolong buatkan program bilangan prima dengn menggunakan record dlm program pascal. Mohon pencerahannya pak.
    terima kash.
    Emailme: sidiqmuslim95@yahoo.com

    ReplyDelete
  3. disini gan lihat scriptnya :

    http://jintoples.blogspot.com/2012/12/program-pascal-untuk-menamilkan.html

    ReplyDelete

:) :) :-) :-) :)) :)) =)) =)) :( :( :-( :-( :(( :(( :d :d :-d :-d @-) @-) :p :p :o :o :>) :>) (o) (o) [-( [-( :-? :-? (p) (p) :-s :-s (m) (m) 8-) 8-) :-t :-t :-b :-b b-( b-( :-# :-# =p~ =p~ :-$ :-$ (b) (b) (f) (f) x-) x-) (k) (k) (h) (h) (c) (c) cheer cheer

 
© Jin Toples Programming
Designed by BlogThietKe Cooperated with Duy Pham
Released under Creative Commons 3.0 CC BY-NC 3.0