;

Jumat, 15 Juni 2012

program pascal


Program Pascal
1.    Listing1. Program menggunakantipe Record
Program TipeRecord;
Uses  
     Crt;
type
     TSiswa=record
          NIM:string[8];
     Nama:string[25];
     Umur:integer;
     end;
var
     S:TSiswa;
begin
     writeln(‘Isikaninformasimengenaidirianda:’);
     write(‘NIM:’);readln(S.NIM);
     write(‘Nama:’);readln(S.Nama);
     write(‘Umur:’);readln(S.Umur);
     writeln;
     writeln(‘NIM:’,S.NIM);
     writeln(‘Nama:’,S.Nama);
     writeln(‘Umur:’,S.Umur);
     readln;
end.



ContohHasil yang diberikandari program 1 di atasadalahsebaagaiberikut:
Isikaninformasimengenaidirianda :
NIM            : DOBO5777
Nama           : RizkiDwiMulyana;
Umur           : 18
Berikutiniinformasi yang telahandaisikan:

NIM              : DOBO5777
Nama           : RizkiDwiMulyana
Umur           : 18

Tidak ada komentar:

Poskan Komentar