BacaSelengkapnya...
10 tahun yang lalu
Record dan Pointer
Makalah Praktikum Dasar Pemrograman
Record dan Pointer
Disusun Oleh :
Ahmad Mafazi D (41510010059)
Ahmad Ngabdiran (41510010063)
Winda Mediana (41510010068)
Universitas Mercu Buana
Tahun Akademik 2010/2011
BacaSelengkapnya...
MAKALAH PASCAL
HIMPUNAN/SET, SKALAR, dan SUBRANGE
Disusun Oleh : (Kelompok 5)
Ali Nardi (41510010058)
Heri Yulianto (41510010060)
Rojayadi (41510010064)
Ricky Putra (41510010001)
BacaSelengkapnya...
ABSOLUTE ASSEMBLER() FAR FORWARD INDEX
TUGAS MAKALAH
PRAKTIKUM DASAR PEMROGRAMAN
KELOMPOK 3:
Naomi Septiana. P (41808010153)
Aini Suryanah (41510010017)
Azura Ayarra (41510010019)
Nila Astuti (41510010026)
Syamsul Bahri (41510010002)
Statemen adalah perintah untuk pengerjaan program pascal. Statemen terletak di bagian deklarasi statemen dengan diawali oleh kata cadangan BEGIN dan diakhiri dengan kata cadangan END. Akhir dari setiap statemen diakhiri dengan titik koma(;). Statemenstatemen dalam bahasa Pascal terdiri dari pernyataan yang berupa fungsi dan prosedur yang telah disediakan sebagai perintah standar Turbo Pascal.
1. Statemen-statemen yang digunakan untuk input/output
1.1. READ/READLN(prosedur)
Digunakan untuk memasukkan (input) data lewat keyboard ke dalam suatu variabel.
Sintaks: READ/READLN(V);
Keterangan :
V = variabel.
READ = pada statemen ini posisi kursor tidak pindah ke baris selanjutnya.
READLN = pada statemen ini posisi kursor akan pindah ke baris selanjutnya setelah di input.
1.2. READKEY(fungsi)
Untuk pembacaan sebuah karakter dari keyboard. Tipe data yang dihasilkan adalah char.
Sintaks: READKEY;
1.3. WRITE/WRITELN(prosedur)
Digunakan untuk menampilkan isi dari suatu nilai variabel di layar.
Sintaks: WRITE/WRITELN(V);
Keterangan :
V = variabel.
WRITE/WRITELN = sama dengan READ/READLN.
2. Statemen-statemen yang digunakan untuk pengaturan letak di layer
2.1. CLRSCR(prosedur)
Digunakan untuk membersihkan layar.
sintaks: CLRSCR;
2.2. GOTOXY(prosedur)
Untuk menempatkan posisi kursor pada layar.
Sintaks: GOTOXY(X, Y: Byte);
Keterangan :
X = sumbu X (posisi horisontal), Y = sumbu Y (posisi vertikal)
2.3. DELLINE(prosedur)
Untuk menghapus sebuah baris pada posisi kursor dan menaikkan baris-baris dibawahnya.
Sintaks: DELLINE;
2.4. INSLINE(prosedur)
Untuk menyisipkan sebuah baris pada posisi kursor dan menggeser kebawah tampilan-tampilan
baris dibawahnya.
Sintaks: INSLINE;
2.5. DELAY(prosedur)
Untuk menghentikan sejenak proses program.
Sintaks: DELAY(MS: Word);
Keterangan : MS = ukuran waktu dalam milisecond.
3. Statemen yang digunakan untuk memanipulasi string
3.1. CONCAT(fungsi)
Untuk menggabungkan 2 atau beberapa variabel string.
Sintaks: CONCAT(s1 [,s2,...,sn]: String) : STRING;
contoh: CONCAT('ABC','DEF') { ABCDEF }
3.2. COPY(fungsi)
Mengambil satu(1) atau beberapa karakter dari sebuah string.
Sintaks: COPY(S,Index,Count) : String;
Keterangan :
S = sebuah string (string).
Index = posisi awal kita akan mengambil beberapa karakter (integer)
Count = banyaknya karakter yang akan diambil (integer).
3.3. DELETE(prosedur)
Menghapus sebagian karakter dari sebuah string.
Sintaks: DELETE(S,Index,Count);
Keterangan : sama dengan statemen COPY.
3.4. INSERT(prosedur)
Menyisipkan satu(1) atau beberapa karakter ke dalam sebuah string.
Sintaks: INSERT(Source,var S,Index);
Keterangan :
Source = sumber string untuk disisipi (string)
var S = string tujuan yang akan disisipi oleh string Source (string)
Index = posisi mulai (integer).
3.5. LENGTH(fungsi)
Memberikan nilai panjang dari suatu string (jumlah karakterdalam string).
Sintaks: LENGTH(S);
Keterangan :
S = string
LENGTH(S) menghasilkan nilai integer.
3.6. POS(fungsi)
Mencari posisi sebuah bagian string (substring) didalam sebuah string.
Sintaks: POS(Substr,S); {menghasilkan nilai Byte}
Keterangan :
Substr = substring yang akan dicari posisinya di dalam sebuah string S. Bila
bernilai 0 berarti nilai string yang dicari tidak ada.
3.7. STR(prosedur)
Merubah nilai numerik ke dalam nilai string.
Sintaks: STR(N,S);
Keterangan :
N = data tipe integer,
S = data tipe string.
3.8. VAL(prosedur)
Merubah nilai string ke dalam nilai numerik.
Sintaks: VAL(S,N,P);
Keterangan :
S = nilai string,
N = nilai real,
P = posisi salah.
Nilai string harus berisi angka, plus atau minus, bila tidak berarti kesalahan dan letak kesalahannya
ditunjukkan oleh variabel posisi salah. Jika benar, maka nilai variabel tsb = 0 (nol).
3.9. UPCASE(fungsi)
Memberikan huruf kapital dari argumen.
Sintaks: UPCASE(S);
Keterangan :
S = variabel bertipe karakter.
4. Statemen-statemen untuk perhitungan aritmatik
4.1. ABS(fungsi)
Memberikan nilai mutlak dari suatu argumen.
Sintaks: ABS(x);
4.2. ARCTAN(fungsi)
Memberikan nilai dari fungsi arctangent dari perhitungan goniometri.
Sintaks: ARCTAN(x);
Dimana x dapat bertipe real atau integer dan akan menghasil kan nilai bertipe real.
4.3. COS(fungsi)
Memberikan nilai dari fungsi Cosinus.
Sintaks: COS(x);
4.4. EXP(fungsi)
Menghitung nilai pangkat dari bilangan e (bilangan alam),
yaitu sebesar x.
Sintaks: EXP(x);
x dapat bertipe real atau integer dan akan menghasilkan nilai bertipe real.
4.5. FRAC(fungsi)
Untuk mendapatkan nilai pecahan dari suatu bilangan.
Sintaks: FRAC(x);
Tipe dari x sama seperti yang diatas.
4.6. INT(fungsi)
Memberikan nilai integer (bilangan bulat) dari suatu variabel dengan membuang bilangan
di belakang koma.
Sintaks: INT(X);
4.7. LN(fungsi)
Digunakan untuk menghitung nilai logaritma alam (natural logarithm) dari nilai x.
Sintaks: LN(x);
4.8. SIN(fungsi)
Memberikan nilai dari fungsi Sinus.
Sintaks: SIN(x);
4.9. SQR(fungsi)
Digunakan untuk menghitung nilai pangkat kuadrat dari suatu bilangan.
Sintaks: SQR(x);
Tipe dari x bisa berupa real maupun integer. Dan hasilnya akan sama dengan tipedari x.
4.10. SQRT(fungsi)
Digunakan untuk menghitung nilai akar dari suatu bilangan.
5. Statemen-statemen untuk transfer nilai dari suatu variable
5.1. CHR(fungsi)
Merubah nilai dari byte ke bentuk karakter yang sesuai dengan kode ASCII.
Sintaks: CHR(x);
Keterangan : x bertipe byte
contoh : WRITELN(CHR(61);
hasilnya : a
5.2. ORD(fungsi)
Merubah nilai suatu variabel dari bentuk karakter ke bentuk longint.
Sintaks: ORD(X);
Keterangan : x bertipe char
contoh : WRITELN(ORD('B');
hasilnya : 42
5.3. ROUND(fungsi)
Membulatkan data tipe real ke data tipe longint.
Sintaks: ROUND(X);
Keterangan : Jika nilai pecahan < 0,5 maka dibulatkan kebawah. Jika nilai pecahan > 0,5 maka dibulatkan keatas.
contoh : WRITELN('10/3 dibulatkan = ',ROUND(10/3));
hasilnya : 10/3 dibulatkan = 3
5.4. TRUNC(fungsi)
Membulatkan kebawah data tipe real ke data tipe longint.
Sintaks: TRUNC(X);
contoh :
WRITELN('20/3 dibulatkan kebawah = ',TRUNC(20/3));
hasilnya : 20/3 dibulatkan kebawah = 6
6. Statemen-statemen untuk memanipulasi data
6.1. PRED(fungsi)
Memberikan nilai sebelum nilai argumen dalam urutannya dalam ASCII.
Sintaks: PRED(x);
6.2. SUCC(fungsi)
Memberikan nilai sesudah nilai argumen dalam urutannya dalam ASCII.
Sintaks: SUCC(x);
6.3. INC(fungsi)
Menambah (increments) nilai suatu variabel.
Sintaks: INC(x,i); {i >= 1}
6.4. DEC(fungsi)
Mengurangi (decrements) nilai suatu variabel.
Sintaks: DEC(x,i); {i >=1}
7. Statemen-statemen tambahan (warna,suara dan window)
7.1. TEXTCOLOR(prosedur)
Untuk mengatur warna dari karakter-karakter di layar.
Sintaks: TEXTCOLOR(color : Byte);
Catatan : untuk pilihan warna lihat pada buku Turbo Pascal.
7.2. TEXTBACKGROUND(prosedur)
Untuk mengatur warna latar belakang dari karakter-karakter dilayar.
Sintaks: TEXTBACKGROUND(Color : Byte);
7.3. WINDOW(prosedur)
Untuk membuat suatu jendela (window) yang terletak pada layar.
Sintaks: WINDOW(x1,x2,y1,y2 : Byte);
x1,x2 = kordinat kiri atas dengan nilai maksimal sesuai dengan mode layar.
y1,y2 = kordinat kanan bawah dgn nilai maksimal sesuai dengan mode layar.
7.4. TEXTMODE(prosedur)
Untuk mengatur lebar layar, 80 kolom atau 40 kolom.
Sintaks: TEXTMODE(Mode: Byte);
Default = C80
7.5. SOUND(prosedur)
Untuk mengaktifkan suara(beep) pada internal speaker.
Sintaks: SOUND(Hz : word);
Untuk mengnonaktifkannya, gunakan statemen NOSOUND.
. Ciri Program Komputer:
Umumnya setiap program komputer memiliki ciri-ciri berikut ini :
• dijalankan secara berurutan (sequence) dari atas ke bawah (awal dan akhir)
• memiliki pernyataan bersyarat (IF …. Then, IF .. Then .. Else…, Case… OF) dan
• memiliki pernyataan berulangan (For… Do, While….Do, Repeat … Until)
Untuk membentuk ke tiga syarat tersebut program memiliki tahap-tahap :
• Input
• Proses
• Output
Sistem Kerja Komputer Sistem Kerja Program
Anda perhatikan kembali modul I hal 1, diagram alir (flow chart) menjumlahkan dua buah bilangan seperti gambar di bawah ini :
Program Menjumlahkan(A,B);
Var
A, B : Integer;
Begin
A:=5;
B:=15;
C:=A+B;
Writeln(C);
End.
BacaSelengkapnya...
Fungsi dlm Pascal
FUNGSI
Blok fungsi hampir sama dengan blok prosedur, hanya fungsi harus dideklarasikan dengan tipenya. Tipe deklarasi ini menunjukkan tipe hasil dari fungsi. Bentuk umum :
FUNCTION identifier (daftar parameter) : type ;
Blok fungsi juga diawali dengan kata cadangan Begin dan di akhiri dengan kata cadangan End dan titik koma.
Perbedaan fungsi dengan prosedur adalah :
Pada fungsi, nilai yang dikirimkan balik terdapat pada nama fungsinya ( kalau pada prosedur pada parameter yang dikirimkan secara acuan).
Karena nilai balik berada di nama fungsi tersebut, maka fungsi tersebut dapat langsung digunakan untuk dicetak hasilnya. Atau nilai fungsi tersebut dapat juga langsung dipindahkan ke pengenal variable yang lainnya.
Pada prosedur, nama prosedur tidak dapat digunakan lagsung, yang dapat langsung digunakan adalah parameternya yang mengandung nilai balik.
1.1 . Fungsi Tanpa Parameter
Fungsi yang tanpa parameter berarti nilai balik yang akan dihasilkan merupakan nilai yang sudah pasti. Karena tidak menggunakan parameter, maka hasil fungsi tersebut tidak dapat diatur dari modul yang menggunakannya, karena tidak ada parameter yang dikirimkan. Fungsi tanpa parameter jarang dipergunakan.
Contoh program :
Type Huruf = string [6] ;
Function Garis : Huruf ;
Begin
Garis : = ‘======’ ;
End ;
Begin
Writeln (Garis) ; Writeln (‘Pasc¬¬al’) ; Writeln (Garis) ;
End.
Output program :
======
Pascal
======
Keterangan program :
Fungsi “Garis” hanya menghasilkan nilai yang sudah pasti yaitu : “======”.
1.2 . Parameter Dalam Fungsi
Parameter dalam fungsi dapat dikirimkan secara nilai atau secara acuan.
Contoh penulisan parameter dengan pengiriman secara nilai :
Function Hitung (A, B : integer ) : integer ;
Contoh program :
Function Terbesar(X, Y : real ) : real ;
Begin
If X > Y Then
Terbesar : = X
Else
Terbesar : = Y ;
End ;
Var
Nilai1 , Nilai2 : real ;
Begin
Write (‘Nilai pertama =’ ) ; readln (Nilai1) ;
Write (‘Nilai kedua = ‘ ) ; readln (Nilai2) ;
Writeln (‘Nilai terbesar adalah =’, Terbesar (Nilai1, Nilai2) : 9 : 3 ) ;
End.
Output program :
Nilai pertama = 12.356
Nilai kedua = 55.182
Nilai terbesar adalah = 55.182
Function Algoritma & Pemrogram 2A
Penulisan judul fungsi yang menggunakan parameter dengan pengiriman secara acuan adalah dengan menambahkan kata cadangan var.
Contoh penulisan :
Function Hitung ( Var A, B : integer ) : integer ;
Pengiriman parameter secara acuan akan mengakibatkan perubahan nilai parameter di fungsi juga merubah nilai parameter di modul yang mengirimkannya. Fungsi yang menggunakan pengiriman parameter secara acuan ini mirip dengan prosedur, yaitu parameter yang dikirmkan secara acuan tersebut dapat di manfaatkan sebagai hasil balik.
1.3 . Fungsi Pangkat
Pascal tidak menyediakan fungsi untuk perpangkatan tinggi, yang ada hanya fungsi standar Sqr, yaitu pemngkatan kuadrat saja. Bila akan melakukan perpangkatan lebih dari pangkat dua, maka harus dibuat program tersendiri.
1.4 . Fungsi Memanggil Dirinya Sendiri
Proses fungsi memanggil dirinya sendiri juga merupakan proses recursion.
Contoh program :
Function Faktorial (Nilai : integer ) : real ;
Begin
If Nilai = 0 Then
Faktorial : = 1
Else
Faktorial : = Nilai * Faktorial (Nilai – 1 ) ;
End ;
Var
N : integer ;
Begin
Write (‘Berapa factorial ?’) ;
Readln (N) ;
Writeln (N, ‘faktorial =’, Faktorial(N) : 9 : 0 ) ;
End.
Output program :
Berapa factorial ? 5
5 faktorial = bbbbbb120
ket : b = blank
1.5 . Fungsi Memanggil Fungsi Yang Lain
Fungsi yang di panggil letaknya harus berada di atas fungsi yang memanggilnya.
Contoh program :
Function Fungsi2 (Y : integer) : integer ;
Begin
Fungsi2 : = Y * 2 ;
End ;
Function Fungsi1 ( X : integer ) : integer ;
Begin
Fungsi1 : = Fungsi2 (X) + 5 ;
End ;
Begin
Writeln (Fungsi1(3)) ;
End.
1.6 . Acuan Forward Pada Fungsi
Fungsi dapat dideklarasikan terpisah dengan bloknya. Deklarasi fungsi yang terpisah dengan blok fungsinya dipergunakan kata cadangan Forward dan blok fungsinya juga di deklarasikan ulang, tetapi tidak perlu menyebutkan parameternya.
1.7 . Fungsi Tersarang
Merupakan fungsi yang letaknya berada di dalam fungsi yang lainnya.
Contoh program :
Function Fungsi1 (X : integer ) : integer ;
Function Fungsi2 ( Y : integer ) : integer ;
Begin
Fungsi2 : = Y * 2 ;
End ;
Begin
Fungsi1 : = Fungsi2 (X) + 5 ;
End ;
Begin
Writeln (Fungsi1 (3)) ;
End.
1.8 Fungsi Standar
1.8.1 Fungsi Standar Aritmatika
Ada Abs, ArcTan, Cos, Exp, Franc, Int, Ln, Pi, Sin, Sqr dan Sqrt
Penjelasan :
Abs (x) ; Memutlakkan suatu nilai yang ditunjukkan oleh argument x. dapat berupa tipe real atau integer.
Exp (x : real ) : real ; Untuk menghitung nilai pangkat dari bilangan e. dapat berupa real atau integer dan hasil dari fungsinya adalah real.
Ln (x : real ) : real ; Untuk menghitung nilai logaritma alam dari nilai x. tipe datanya real atau integer dan hasil fungsinya adalah real.
Int (x : real) : real ; Untuk menghasilkan nilai integer dari x. hasil dari fungsi adalah tipe real dengan nilai yang berupa pembulatan ke bawah dari nilai x.
Franc (x : real ) : real ; Untuk mendapatkan nilai pecahan dari argument x. Argumen x dapat berbentuk real atau integer dan hasilnya adalah real.
Sqr (x) ; Untuk menghitung nilai pangkat kuadrat dari argument x.
Sqrt (x : real ) : real ; Untuk menghitung nilai akar dari argument x. dapat real dan integer dan hasil dari fungsinya adalah real.
Pi : Akan menghasilkan nilai PI sebesar 3, 14.
1.8.2 Fungsi Standar Transfer
Digunakan untuk merubah suatu nilai ke bentuk nilai yang lain. Yang tersedia adalah fungsi standar Chr, Ord, Round dan trunc.
Penjelasan :
Chr (x : byte) : char ; Untuk merubah nilai dari byte x ke bentuk karakter yang sesuai dengan kode ASCII.
Ord (x) : longint ; Untuk merubah nilai x ke bentuk nilai longint yang sesuai dengan kode ASCII. Fungsi ini kebalikan dari fungsi standar Chr.
Round (x : real) : longint ; Untuk membulatkan nilai dari real x ke nilai longint yang terdekat. Bila nilai pecahan sama dengan atau lebih besar dari 0,5 akan dibulatkan ke atas, sedangkan bilai nilai pecahan lebih kecil dari 0,5 akan dibulatkan ke bawah.
Trunc (x : real) : longint ; Untuk membulatkan nilai dari real x ke nilai longint terkecil, atau dengan kata lain membulatkan ke bawah.
1.8.3 Fungsi Standar Lainnya
Terdiri dari : Hi, Lo, Random, SizeOf, Swap, UpCase, ParamCount dan ParamStr.
Penjelasan :
Hi (x) : byte ; Untuk mengisi low order byte dari hasil fungsi dengan high order byte dari ungkapan integer x. high order byte dari hasil fungsi akan bernilai nol. Tipe hasil dari fungsi ini adalah byte.
Lo (x) : byte ; Untuk mengisi low order byte dari hasil fungsi dengan low order byte dari ungkapan integer x. high order byte dari hasil fungsi akan bernilai nol. Tipe hasil dari fungsi ini adalah byte.
Swap (x) ; Untuk membalik bit-bit di low order byte menjadi high order byte dan sebaliknya dari ungkapan x. ungkapan x dapat berupa tipe integer atau word.
Random [ (range : word ) ] ; Untuk menghasilkan angka random berkisar dari nilai lebih besar atau sama dengan nol dan lebih kecil dari satu. Bila range tidak disebutkan, hasil dari fungsi ini adalah real. Bila range disebutkan, hasilnya adalah word.
SizeOf (x) : word ; Untuk menunjukkan besarnya byte yang digunakan oleh suatu variable x. hasilnya adalah word.
UpCase (Ch : char ) : char ; Untuk merubah argument suatu karakter yang ditunjukkan oleh Ch menjadi bentuk karakter huruf besar ( upper case ).
ParamCount: word ; Untuk mengetahui jumlah parameter yang dikirimkan lewat promt DOS
ParamStr (index) : string ; Untuk menerima parameter yang dikirmkan lewat promt DOS, index adalah ungkapan dengan tipe word, dan akan menghasilkan parameter ke index yang dikirmkan tersebut.
BacaSelengkapnya...
Promo Januari 2011
Semangat Pagi….
Mau mengabarkan “Promo Terbaru Oriflame” yang berlaku di Katalog January 2011.
Ini dia detailsnya…
DAPATKAN
Eclat Man/Women EDT secara GRATIS
Lakukan order akumulasi 100 BP dan dapatkan
Eclat Man EdT atau Eclat Woman EdT hanya Rp.69.000,-* (harga consultant)
ATAU
Lakukan order akumulasi 150 BP dan dapatkan
Eclat Man EdT GRATIS!*
Anda bisa mendapatkan hadiah TAMBAHAN “GOLDEN Treasures”
Caranya?
Penuhi kualifikasi untuk ‘Business Class” pada bulan :
January + February + Maret
(Anda mempunyai poin pribadi 150BP)
Maka “Golden Treasures” ini bisa anda miliki hanya dengan membayar Rp. 99.000,- (harga consultant)
Mau tau apa saja hadiahnya? Ini dia gambarnya
Oh ia… semua promo di atas hanya berlaku untuk MEMBER ORIFLAME. Bila anda belum bergabung, segera klik JOIN dan lengkapi data anda di form pendaftaran, kami akan menghubunti anda.
Sampai ketemu di BOSS Family!
Go Diamond!
BacaSelengkapnya...
Mengapa Bisnis Jaringan
Banyak yang anti dengan bisnis MLM. Daripada terus mencomooh dan kedepanpun belum tentu punya masa depan lebih baik dari kami, lebih baik cari tau mengapa ratusan orang di BOSSfamily saat ini bisa punya penghasilan dari 1 – 60 juta rupiah (yang ratusan ribu rupiah? wuihh jauh lebih banyak lagi). Biar tidak jauh ketinggalan, dan cuma bisa menjadi penonton saja, sebaiknya buka dulu wawasan Anda tentang bisnis yang sangat simple ini.
BOSSfamily terbukti punya sistem cepat bagaimana anda menjadi jutawan selanjutnya. Anda akan belajar dan bergabung dengan ribuan member kami di seluruh Indonesia dan beberapa negara Asia.
Saya memulai bisnis Oriflame di tahun 2004, meninggalkan dunia kantor yang sudah saya geluti 12 tahun hanya untuk menekuni bisnis Oriflame yang hampir banyak tidak dilirik orang2 di level Manager. Satu-satunya alasan meninggalkan dunia kantor karena tentunya gaji yang tidak bisa bertambah setiap bulan dan lagipula saya tidak berencana bekerja seumur hidup saya hanya untuk uang. Jadi…? Saat ini saya dan Downline2 saya sudah membuktikannya, Anda tinggal copy paste saja apa yang kami lakukan.
Hanya perlu kerja keras sebentar untuk menjadi seperti sekarang ini. Meraih penghasilan hampir 60 juta setiap bulannya, liburan keliling dunia gratis setiap Januari dan summer – dua tiket pula, mobil CRV, waktu kerja yang tidak diatur2 oleh jam kantor dan tentunya itu semua hadiah dari Oriflame. Apakah itu bukan suatu anugrah mengenal bisnis ini? ALhamdulillah…
Lalu…Apa iya bisnis Oriflame sama seperti bisnis MLM lainnya? Mecari korban, hanya di atas2nya yang enak atau mereka yang lebih dulu gabung akan berhasil? Seperti saya katakan. Berhentilah berfikir menyesatkan seperti itu. Fikirkan dengan logika, dimana Anda bisa mendapatkan penghasilan juta2 hanya dengan modal puluhan ribu? Dan apakah itu membuat anda menjadi bangkrut dan merasa jadi korban? Rasanya bikin warung kecil dan jelekpun anda harus keluar modal lebih dari ratusan ribu!
Bisnis ini bukan money game atau perputaran uang di mana bonus Anda hanya akan keluar jika ada keseimbangan di Jaringan Anda. Tidak, bisnis kami bukan seperti itu. Dan Anda juga bisa lebih cepat sukses dari yang sudah bergabung di tahun2 lalu. Saya adalah salah satu contohnya. Hanya dalam waktu 6 tahun, saya bisa masuk menjadi Leader no 17 dari 200,000 membernya di seluruh Oriflame Indonesia, pastinya meninggalkan mereka2 yang bergabung jauh lebih lama dari saya.
Satu lagi tips dari saya, cari bisnis MLM yang produknya bisa Anda gunakan sendiri untuk sehari2 dan tentunya harganya yang terjangkau kantong, sehingga memudahkan anda untuk membeli / menjual produk anda atau mencari teman untuk menjadi tim bisnis Anda. Bisnis Oriflame itu satu2nya bisnis dengan pertumbuhan tercepat di dunia Direct selling / MLM, mengapa? Karena Oriflame menjadi pilihan orang2 di seluruh dunia untuk berbisnis ketika mereka terkena PHK karena krisis global ekonomi.
Tapiiii…Jangan salah gabung Oriflame, Karena bisnis itu juga perlu bukti. Di sini, ada Pelajar SMA, Mahasiswa, Dokter, Guru, Sekretaris, Manajer kantoran, Pegawai Negeri, Ibu rumah tangga, Artis Penyanyi, Presenter berita sekalipun!! Ada laki-laki, perempuan, tua muda, dan mereka semua punya penghasilan super dari bisnis ini. Dan taukah Anda, member kami banyak yang sudah meninggalkan dunia kantornya karena penghasilannya jauh 10 kali lipat lebih tinggi dari saatnya berkantor dulu.
Bisnis itu juga perlu pelatih, perlu sistem dan pastinya perlu organisasi yang besar dan kuat. Gabung di Bossfamily, ratusan Leader2 kami handal dan siap membantu menjadikan anda jutawan selanjutnya tidak hanya di dunia online, tapi dengan dunia offline sekalipun! Mereka siap mengembangkan jaringan Anda!
Selamat bergabung di jaringan yang tepat!
Testimoni – Meuthia Rizki
BacaSelengkapnya...
Langganan:
Postingan (Atom)
