Reviewed Date: Reviewed Rating: 4.9

Contoh Syntax Pascal Program Tipe Pointer & Pointer Tak Bertipe

15.05
Contoh Syntax Pascal Program Tipe Pointer dan Pointer Tak Bertipe - Contoh coding pointer pascal ini sudah saya coba dan terbukti berhasil 100% work di aplikasi Turbo Pascal for Windows. Oke silahkan disimak dan dicoba dengan baik-baik, untuk penulisan jangan sampai salah ketik.

Contoh Syntax Pascal Program Tipe Pointer & Pointer Tak Bertipe

#1. Contoh Syntax Pascal Program Tipe Pointer 

Program tipe_pointer;
Uses WinCrt;
var
nama : string [20] ;
pointer : ^ string ;
begin
clrscr;
nama := ’Unyil’ ;
writeln ( ‘variabel nama berisi :’, nama) ;
pointer := @nama;
writeln ( ‘variabel pointer merujuk ke nilai : ’, pointer ^) ;
nama:= ’Alex’ ;
writeln ( ‘variabel pointer merujuk ke nilai : ’, pointer ^) ;
pointer^ := ’Joni’ ;
writeln ( ‘variabel nama berisi : ’, nama) ;
readln ;
end.

#2. Contoh Syntax Pascal Program Pointer Tak Bertipe

Contoh Syntax Pascal Program Pointer Tak Bertipe
Hasil Jadi

program pointer_tak_bertipe;
uses WinCrt;
var
p : pointer ;
q : ^Byte ;
r : array [0..19] of Byte;
i : Byte;
begin
GetMem (p,20);
q := p ;
for i := 0 to 19 do
begin
r [ i ] := 19 - i ;
q^ := 19 - i ;
inc (q^) ;
end;
q := p ;
for i := 0 to 19 do
begin
write ( ' r [ ' , i , ' ] = ' , r [ i ] , ' ; ' ) ;
writeln ( ' p ^ ke- ' , i , ' = ' , q ^ ) ;
end ;
readln ;
end.

Baca juga :

Demikianlah artikel Contoh Syntax Pascal Program Tipe Pointer & Pointer Tak Bertipe, semoga bermanfaat.


Salam anak TKJ !

Download Vidmate Aplikasi Untuk Download Film , Music, Anime, Game, Apps, Terlangkap

Artikel Lainnya

Previous
Next Post »
Blogger
Pilih Sistem Komentar Yang Anda Sukai

Posting Komentar

Ayo budayakan komentar setelah membaca artikel ! (Jangan SPAM ya)