Contoh program pascal pointer ke pointer pascal

Kali ini saya akan share sedikit tentang pointer dalam bahasa pemrograman pascal, berikut source code yang telah saya buat :

program pointer;

uses crt;

type

  ptr= ^integer;

var



  p: integer;

  x : integer;



procedure tambah (a,b:integer; c:ptr);

begin

   c^:= a+b;

end;

begin

  tambah(10,5, @p);

  writeln(p);

  readln;

end.

Berikut Hasil Outputnya :