Latihan 15 Free Pascal Console

program Latihan15;

{$mode objfpc}{$H+}

uses
  {$IFDEF UNIX}{$IFDEF UseCThreads}
  cthreads,
  {$ENDIF}{$ENDIF}
  Classes
  { you can add units after this };



var

  Nama: string;
begin

  write('Silahkan tuliskan nama anda:  ');

  readln(Nama);

  writeln('Halo ', Nama);

  writeln('Silahkan menekan tombol ENTER untuk menutup');

  readln;


end.