CONTOH PENGULANGAN "peluncuran roket di mulai dari 10,9,8,..,0"
 

program PELUNCURAN_ROKET ;

{ hitung mundur peluncuran roket }

uses wincrt;

(* DEKLARASI *)

var

   k : integer;

(* DESKRIPSI *)

begin

     for k:=10 downto 0 do

         writeln(k);

     write('Go!!!!');      { roket meluncur }

end.

Nama : HERY SUPRIZA
Nim : D1042131010