Laporan Akhir Pointer pada Pascal

Tampilan Koding Window pascal : Tampilan Output Pointer : KODING SELENGKAPNYA: uses crt; type pointer = ^cell; cell = record      value : integer;      next: pointer; end; var last, belakang, q, p: pointer;     angka,nomor : integer;     jawab : char;     found : boolean; procedure...

Assign pada Pascal II

Sebelumnya Assign dapat digunakan untuk menulis file, sekarang perintah assign dapat digunakan untuk membaca file. Tampilan coding window Bila program dijalankan dapat membuka file berbasis ASCII, maka tampilannya: KODING KESELURUHAN USES CRT; VAR BERKAS :TEXT; KAR : CHAR; NFILE :STRING; BEGIN CLRSCR; WRITE ('MASUKAN NAMA FILE YANG INGIN DI LOAD : '); READLN (NFILE); ASSIGN...

Assign pada Pascal

Assign pada pascal dapat digunakan untuk menulis sebuah file text. langsung aja nih, tampilan coding window nya: Lalu, bila dijalankan maka akan tampak seperti dibawah ini: KODING LENGKAP USES CRT; VAR BERKAS :TEXT; KALIMAT :STRING; NFILE :STRING; BEGIN CLRSCR; WRITE ('MASUKAN NAMA FILE UNTUK DI BUAT : '); READLN (NFILE); ASSIGN (BERKAS,NFILE); REWRITE (BERKAS); WRITELN; WRITELN...

Function pada Pascal

Contoh program menentukan program besar dan kecilnya suatu input. Window Coding: Tampilan Output Program: Cara Kerja Program: USES CRT; Untuk Mendeklarasikan Bahwa saya menggunakan Monitor CRT sebagai Monitor Utama (Background Hitam dengan Tulisan Putih), FUNCTION BESAR (A,B:INTEGER):INTEGER; Program akan membuat sebuah function dengan A,B sebagai Integer. ...

Faktorial pada Pascal

Coding window pada pascal: Tampilan bila program dijalankan: Code Program Faktorial pada Pascal : USES CRT; PROCEDURE FAKTORIAL;  VAR A,B,C,TOT:INTEGER;  BEGIN  WRITELN ('MASUKKAN ANGKA');  READLN (A);  B := A;  TOT := 1;   BEGIN   WHILE B >= 1 DO    BEGIN    TOT := TOT * B;    B := B - 1;   ...

Program Record pada Pascal

Tampilan jendela coding : Tampilan Output Program: Code Program Record pada Pascal: USES CRT; TYPE RECPEGAWAI=RECORD KODE, ALAMAT, NAMA, GAJI: STRING; END; VAR PEGAWAI: RECPEGAWAI; BEGIN WITH PEGAWAI DO BEGIN CLRSCR; KODE:='XXX/MVI/209'; NAMA:='STANFORD GATES BARLEY'; ALAMAT:='STANBURG VALLEY, CALIFORNIA, US'; GAJI:='10000000'; WRITELN ('KODE PEGAWAI  = ',PEGAWAI.KODE); WRITELN...

Bilangan Prima dengan Pascal

Code Program Bilangan Prima pada Pascal: Tampilan jika program dijalankan: Logika Program: Program akan mendeklarasikan PRIMA sebagai sebuah fungsi Array, dimana PRIMA memiliki range antara 1 sampai 100, dan anggota PRIM adalah Integer, lalu mendefinisikan I dan J sebagai integer, lalu memulai program, lalu membersihkan layar, mengidentifikasi I untuk I = 2 sampai 100,PRIMA = I, lalu membagi...