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;