Minimnya Sosialisasi Ekonomi Syariah

Masyarakat Ekomomi Syariah (MES) menilai sosialisasi ekonomi syariah pada masyarakat perlu ditingkatkan.

Ketua Umum MES Muliaman D. Hadad mengatakan pemahaman masyarakat terhadap konsep ekonomi syariah, terutama pada produk syariah masih terbatas.

“Pencanangan gerakan ekonomi syariah oleh Presiden Susilo Bambang Yudhoyono cukup membantu dalam memperluas pemahaman tentang ekonomi syariah,” ungkapnya di Jakarta, Sabtu (14/12).

Dia menambahkan upaya sosialisasi secara berkesinambungan mengenai peran dan bentuk ekonomi syariah harus terus dilakukan hingga pada unit terkecil yaitu keluarga.

Walaupun sudah banyak bank dan jasa keuangan yang memiliki prinsip syariah, tetapi tetap saja potensi umat Islam di Indonesia seharusnya bisa dimaksimalkan untuk mulai mengenal bisnis syariah.

Program pascal TREE

Berikut ini script program pascal TREE, silahkan di coba...

Sambil di koreksi juga ya... :D

program tree_dinamis;

uses crt;

type pohon=^node;

     node=record

     data:integer;

     kiri,kanan:pohon;

     end;

     var T:pohon;

     info:integer;

     {----------------------------------------}

     Procedure Buat_BST(info:integer;var T:pohon);

     var

     b:pohon;

     begin

     if T=nil then

     begin

     new(b);b^.data:=info;b^.kiri:=nil;b^.kanan:=nil;

     T:=b;

     end

     else

     begin

     if T^.data

     Buat_BST(info,T^.kiri);

     end;

     end;

     {-------------------------------------------}

     Procedure Baca_BST_pre(b:pohon);

     begin

     if (b<>nil)then

     begin

     write(b^.data);

     Baca_BST_pre(b^.kiri);

     Baca_BST_pre(b^.kanan);

     end;

     end;