PENGUMUMAN NAMA CALON GURU DAN KARYAWAN LULUS SELEKSI TAHAP 2 TAHUN PELAJARAN 2017-2018

INSAN CENDEKIA BOARDING SCHOOL PAYAKUMBUH

Jl. R.A. Kartini Padang Kaduduk Kel. Tigo Koto Diate Kec. Payakumbuh Utara

Kota Payakumbuh Provinsi Sumatera Barat

(0752) 796602 Website:insancendekia.sch.id

  DAFTAR NAMA CALON GURU DAN KARYAWAN LULUS SELEKSI UNTUK TAHAP 2 TAHUN PELAJARAN 2017/2018 SYARAT DAN KETENTUAN   Ketentuan Umum

1. Peserta adalah nama yang lulus pada daftar nama calon guru dan karyawan untuk tahap ke dua ini.
2. Tes untuk tahap 2 berupa tes praktik, dilaksanakan pada hari Sabtu dan Minggu tanggal 13 dan 14 Mei 2017 jam 07.30 sampai selesai.

Ketentuan Khusus A. Ketentuan untuk Formasi Guru

1. Datang pada waktu yang ditentukan oleh panitia
2. Tes berupa microteachig atau praktik mengajar dengan durasi waktu selama 20 menit (kegiatan pembuka, kegiatan inti dan kegiatan penutup)
3. Peserta tes menyerahkan RPP untuk pertemuan saat tampil tersebut sebanyak 2 rangkap.

B. Ketentuan untuk Formasi Tenaga Administrasi

1. Datang pada waktu yang ditentukan oleh panitia
2. Peserta diwajibkan membawa laptop
3. Durasi praktik selama 30 menit

C. Ketentuan untuk Formasi Tenaga Kesehatan, Tenaga Pustakawan

1. Datang pada waktu yang ditentukan oleh panitia
2. Tes praktik dengan durasi waktu selama 20 menit

D. Ketentuan untuk Formasi Tenaga Satpam

1. Datang pada waktu yang ditentukan oleh panitia
2. Mengikuti pelatihan untuk seleksi tenaga pengamanan

E. Ketentuan untuk Formasi Pembina Asrama

1. Datang pada waktu yang ditentukan oleh panitia
2. Mengikuti pelatihan untuk seleksi menjadi pembina asrama

  BERIKUT DAFTAR NAMA CALON GURU DAN KARYAWAN LULUS TAHAP 2 TAHUN PELAJARAN 2017/2018

1. PELAMAR GURU SYARIAH
NO	NAMA PELAMAR	L/P	TTL	ALAMAT
1	Al Azhari Rubiati Khaz	P	Teluk Nibung, 25 Januari 1997	Kp Jambak, Sunur, kab. Padang Pariaman
2	Anese Syukriza	L	Jambu Air/20 September 1989	Guguak Rang Pisang, Kec. Kamang Magek, Kab. Agam
3	Budi Putra, S.Pd.I	L	Koto Pulai, 20 Oktober 1990	Kel. Bungo Pasang Kota Padang
4	Gusmita Yulia, S.Ag	P	Kumanis, 13 Agustus 1994	Nag. Kumanis, Kec. Sumpur Kudus, Kab. Sijunjung
5	Muhammad Efendi	L	Payakumbuh, 12 Desember 1990	RT 003/RW 002 Koto Baru Payobasung, kec. Payakumbuh
6	Qurrota A'yun	P	Padang/ 24 Juli 1994	Jl Jati Parak Salai No.33 RT 01/Rw 010, kel Jati, kec Padang Timur
2. PELAMAR GURU PAI
NO	NAMA PELAMAR	L/P	TTL	ALAMAT
1	Afriadi, S.Pd	L	Sumanik/ 05 Februari 1994	Jr. Guguak Tinggi, Nag. Sumanik, Kec. Salimpaung
2	Bunga Indah Eliya Sarah	P	Pekanbaru/ 21 Mei 1992	Desa Pinang Sebatang Timur kec Tualang Perawang
3	Enilpia Anita Sari, S.Pd	P	Sopan Tanah/ 09 Oktober 1993	Maek, Kec. Bukik Barisan, Kab. Lima Puluh Kota
4	Handrial	L	Pulakek/ 25 juli 1993	jor. Koto Birah, Nag. Pulakek Koto Baru, Kec. Sungai Pagu, Kab. Solok
5	Riki Saputra, S.Pd.I	L	Padang Laweh/ 09 September 1991	Jor Padang Laweh Baruah, Kec. Sungai Tarab kab Tanah Datar
6	Rini Maulia, S.Pd.I	P	Padang, 14 September 1992	Lubuk Minturun Kec. Koto Tangah Padang
7	Wasawir Rurrahman, S.Pd.I	L	Koto Gadang/ 2 November 1988	Koto Gadang, kec. IV Koto, kab. Agam
3. PELAMAR GURU PPKN
NO	NAMA PELAMAR	L/P	TTL	ALAMAT
1	Karniatul Lidya	P	Suliki, 11 Juni 1994	Jor Batuang, Kenag Kurai Kec Suliki, Kab 50 Kota
2	POLIANA RIAMA, S.PD	P	SITUJUH GADANG/04 OKTOBER 1991	SITUJUAH GADANG, KEC, SITUJUH LIMO NAGARI, KAB. 50 KOTA
3	Risa Dwita Putri, S.Pd	P	Padang/ 1 Juli 1989	Jl. Surtami Sicincin Mudik, Kel. Sicincin, Payakumbuh
4. PELAMAR GURU BAHASA INDONESIA
NO	NAMA PELAMAR	L/P	TTL	ALAMAT
1	Fitri Elvi, S.Pd	P	Muaralabuh/ 10 Juli 1993	Jl. Penjernihan 3, Gn. Pangilun Padang
2	Intan Pratami	P	Pekan Baru, 20 Juli 1994	Jr Tampat, Nag Padang Laweh, Kec Sungai Pua, Kab Agam
3	Marlelli Efrina, S.Pd	P	Simalanggang/12 Maret 1991	Jr. Tabing Ranah, Nag. Simalnggang, Kab. 50 Kota
4	Nofebrianto, S.Pd	L	Paninjauan/ 11 November 1994	Jr Aia Batumbuak Nagari Paninjauan, kab Solok
5	RAHMADIA LUSRA, S.PD, Gr	P	BUKIT TOGANG/ 24 JULI 1992	KOTO TANGAH SIMALANGGANG, KEC. PAYAKUMBUH
6	Riki Hamdani S.Pd	L	Sungai Sariak, 25 mei 1987	Korong Tanjuang AUR, Kabupaten Padang Pariaman
5. PELAMAR GURU BAHASA ARAB
NO	NAMA PELAMAR	L/P	TTL	ALAMAT
1	Fitriyani, S.Pd I	P	Cingkariang/ 9 November 1992	Cingkariang, Padang Luar kec Banuhampu kab Agam
2	Nelfa Yusti	P	Ladang Laweh, 7 September 1991	Jorong Guguak, Nagari Guguak Malalo, Kab Tanah Datar
3	Nurmayang Sari,	P	Medan, 8 Oktober 1993	Jk. Dr. Moh Hatta No.1 Padang
6. PELAMAR GURU BAHASA INGGRIS
NO	NAMA PELAMAR	L/P	TTL	ALAMAT
1	Arif Budiman S.Pd	L	Bukittinggi/ 19 Februari 1991	Jl Hamka No 18 B. Bukittinggi
2	Fitni Nadriya	P	Salimpaung/01 Julin 1989	Jl. Raya Batusangkar-Buktinggi km. 12
3	Mella Wiani Putri	P	Cupak, 27 Januari 1993	jl Simp Tiga Munggu Pak Jalang Sungai Rotan Cupak
4	Okto Zulkifli	L	Pekanbaru/ 18 Oktober 1983	Jl. Sudirman No.66 Lingk 1 Balai Cacang, Payakumbuh
5	Rafika Oktavionti, S.Pd	P	payakumbuh/ 10 Oktober 1994	Jl. Tan Malaka Kel. Bunian, Kec. Payakumbuh Utara
6	Rahmat Hidayat, S.Pd. Gr	L	Bengkulu,23 juni 1990	Pasir Putih, Pekanbaru, RIAU
7	Silfi Nardiati	P	Bukittinggi, 25 Desember 1992	Kel Pakan Labuah Tigo Baleh, Kec Aur Birugo Tigo Baleh, Bukittinggi
8	Wildara Sri Fanny, S.Pd	P	Payakumbuh 01 Maret 1994	Kel. Padang Datar, Kec. Payakumbuh Barat
7. PELAMAR GURU BAHASA JEPANG
NO	NAMA PELAMAR	L/P	TTL	ALAMAT
1	Beatrice Jasanddes A, S.Hum	P	Padang/27 Agustus 1990	Peum BTI Blok H no. 4 Padang Tangah Payobadar, Payakumbuh
2	Gresia Astri Arsalius, S.S, S.Pd	P	Padang/ 11 Mei 1987	Balai Cacang kec. Payakumbuh Utara kota Payakumbuh
3	Gustia S.Pd	P	Bukittinggi, 17 agustus 1990	Jl Mulia Gg Cempaka Rt/ Rw 06/03m Kab Bengkalis Prov riau
4	Suci Ananda Putri	P	Medan, 11 Juni 1991	Suarau Ladang, kel. Koto Marapak, Kec. Ampek Angkek, Kab Agam
8. PELAMAR GURU MATEMATIKA
NO	NAMA PELAMAR	L/P	TTL	ALAMAT
1	Andri Saputra, S.Pd	L	Andalas, 20 Oktober 1992	Jorong Andaleh, kec. Sungayang
2	Asmul Fajri	L	lubuk Sikaping, 01 Juli 1988	Jl. Hang Tuah No.2 Pekanbaru
3	Baitil Mistina	P	Koto Tinggi/ 30 Maret 1994	Jorong Aia Angek, Kab. Lima Puluh Kota
4	Devita Karlina	P	Surau Laut, 30 Januari 1994	Jr Surau Lauik Kenag. Panampuang, kec. Ampek Angkek
5	Dina Harika, S.Pd.I	P	Parambahan/ 24 September 1987	Jl. Datar, No. 79 A Pagaruyung Batusangkar
6	Femi Septia Wahyuni	P	Batu Basa/ 8 September 1993	Perum Astek Blok R No.8 RT/Rw 01/08 Kuranji,Padang
7	Putri Intannia N, S.Pd	P	Batusangkar/12 Juni 1994	Payakumbuh Utara
8	Rahmi Julita, M.Pd	P	Batu Ampaleh, 05 Maret 1990	Lareh Nan Panjang Nagaru Labuah Gunuang Kec Lareh Sago Halaban
9	Safriyeni, S.Pd	P	Piladang/ 12 Oktober 1992	Baso, kab. Agam Sumatera Barat
10	Siska Permata sari, S.pd	P	Salimpaung,15 Agustus 1991	Jl Purwajaya Sarilamak Kec harau
11	Tri Yulia Sari, S.Pd	P	Padang/ 14 Juli 1991	Kel Padang Sorai Kec. Koto Tangah Padang Sumbar
9. PELAMAR GURU BIOLOGI
NO	NAMA PELAMAR	L/P	TTL	ALAMAT
1	Adam Fernando	L	Padang, 5 September 1991	Jorong Gurun, Kecamatan Sungai Tarab, Kabupaten Tanah Datar
2	Arif Fernando	L	sungai penuh, 3 juni 1990	Kel Sungai Penuh, Kab Kerinci Jambi
3	Iffa Ichwani Putri	P	Payakumbuh/ 15 Juli 1991	Jl Sukma no.13 kel Balai Gurun Payakumbuh Utara
4	Reski Ivon Friska	P	Taeh Bukik/24 Juni 1994	Talago Taeh Bukik, Kab. Lima puluh kota
5	Siti Nurmala Sari	P	Padang Luar, 10 Juni 1989	depan Lapangan Rambatan, Jr Rambatan, Batusangkar
6	Widia Kemala Sari	P	Air Bangis/ 07 Mei 1993	Jl. Sawah Aru, jor. Pasar Pokan, Air Bangis
10. PELAMAR GURU FISIKA
NO	NAMA PELAMAR	L/P	TTL	ALAMAT
1	Indriatil Husni	P	Payakumbuh/ 29 September 1990	Kel Koto Baru Payobasung Payakumbuh Timur
2	Mai Sastri, S.Pd.I	P	Gando/15 Mei 1991	Kel. Anduring, Kec Kuranji, Kota Padang
3	Nadya mahardika	P	Payakumbuh, 23 oktober 1994	Napar, kec. Payakumbuh utara, kota payakumbuh
4	Rahma Dewi Afsita	P	Tembilahan/ 21 Maret 1993	Jl.Raya Minas Perawang KM 17 Kab. Siak Riau
5	Wilda Febi Rahmadhani, S.Si, MPFiS	P	Payakumbuh/12 Maret 1990	Kel. Kaning Bukit, Kec. Payakumbuh Utara, Sumatera Barat
6	Wulan Anggel Valista	P	Padang Panjang/ 5 Juli 1994	Kel Silaying Atas, Kec Padang Panjang Barat
7	YANI FEBRI ARYA, S.PD	P	KOTA BARU/08 FEBRUARI 1991	KOTO BARU, KAB. AGAM, Sumatera Barat
8	Yogi Prima Candra, S.Pd	L	Muara Panas/ 13 November 1994	Bayur, Pauh Kambar kab Padang pariaman
11. PELAMAR GURU KIMIA
NO	NAMA PELAMAR	L/P	TTL	ALAMAT
1	Alfar Dila, S.Pd	L	Palupuh/06 Maei 1993	Jl. Padang Gamuk,Guguak Panjang, Bukitinggi
2	Dewi Anugerah Sulistiana, M.Pd	P	Batusangkar/ 30 Agustus 1990	Jorong Malano Ponco, Baringin Kec V Kaum, Kab. Tanah Datar
3	Floweriza Yulia	P	Solok/ 6 Agustus 1991	Perumnas Lembah Santur kec. Barangin, kota Sawahlunto
4	Meli Menia	P	Painan/ 16 Maret 1992	Jl Sekuntum Bunga Muara Pasar Baru kec. Bayang
5	Nora Fiska, S.Pd	P	Payakumbuh / 12 Juni 1994	Payobasung, Payakumbuh Timur
6	Rocky Syaputra, S.Pd	L	Gantunng Ciri 12 desember 1993	kelurahan gantung ciri, kec. Kubung, kab. Solok
12. PELAMAR GURU IPS
NO	NAMA PELAMAR	L/P	TTL	ALAMAT
1	Leli Pitriani	P	Kerinci, 19 Oktober 1994	Komplek Taruko 1 Bypass Padang
2	M. Roli, S.Pd	L	Koto Tangah Simalanggang/ 26 Juni 1994	Jor. Kubu Gadang, Taeh basuah
3	Novika Maya sari S.pd, Gr	P	Payakumbuh,09 februari 1991	Rt01/rw 02 Kel kaning Bukit, kec payakumbuh Utara
4	Rahmat Firdaus	L	Kototinggi, 15 Maret 1991	Jor Koto Tinggi
5	RAHMATUL HAYATI	P	PILUBANG/ 25 APRIL 1993	PILUBANG, KAB. LIMA PULUH KOTA, PROV. SUMATERA BARAT
6	Refta Aidia, S.Pd	P	Andaleh / 24 Maret 1991	Andaleh, Kec. Luak Kab 50 Kota
7	Venny Septeni, S.Pd	P	Sungai Janiah, 29 September 1990	Jl. Ikan Sakti Sungai Janiah, Kec Baso Kab Agam
8	Vivi Devita Sari	P	Padang,11 Desember 1993	jl. Moh Hatta Anduring No.41 Rt 01 RW 02 Kec. Kuranji Kel Anduring
9	Wiyan Gussarsi, S.Pd	P	Pauakumbuh, 10 Sept 1995	Taeh Baruah, Kec. Payakumbuh, Kab. 50 Kota
13. PELAMAR GURU BIMBINGAN KONSELING
NO	NAMA PELAMAR	L/P	TTL	ALAMAT
1	Hamda Silvi Hayati	P	KTSG/ 29 September 1993	KTSG Jor Tambun Ijuk
2	Isna Tania, S.Pd	P	Padang, 10 Juli 1992	Tunggul Hitam Padang
3	Ninil Endriani	P	N.Gadang/ 18 Januari 1991	Baruah Andaleh, Sariak Laweh, kec. Akabiluru, kab 50 Kota
4	Nurhasani S.Pd.I	P	Balimbing, 20 November 1992	Jorong Balimbing Kenag. Balimbing
5	Refniliana	P	Tanjung Barulak, 23 Oktober 1991	Jl SMA 05 No 02 Balai Baru, Kec Kuranji Padang
6	Tri Ananda, S.Pd I	L	Durian Tinggi/ 16 Juni 1992	Jor Bintungan Sakti, nag. Durian Tinggi kec. Kapur IX kab 50 Kota
7	WIDIA ASTUTI, S.PD.I	P	SALIMPAUNG/29 DESMBER 1992	NAG. SALIMPAUNG, KEC. SALIMPAUNG, KAB. TANAH DATAR
14. PELAMAR GURU PENJASKES
NO	NAMA PELAMAR	L/P	TTL	ALAMAT
1	Bayu Dwi Olanda, S.Pd	L	Payakumbuh/ 08 Februari 1992	Jl. Jend. Sudirman, Kel. Balai Cacang, no. 31 Payakumbuh Utara
2	Fajri Afdal, S.Pd	L	Padang, 01 Januari 1992	Jorong Talago Kenagarian Taeh Bukik Kec Payakumbuh
3	Jemy Pratama	L	Payakumbuh/05 Desember 1991	Jl. Imam Bonjol, Kel. Payolansek, Kota Payakumbuh
4	Muhammad Hidayat, M.Pd	L	Situjua Batua/01 Februari 1992	Apotik Haura Farma Situjuh Batua, Kec. Situjuah Limo Nagari, Kab. 50 Kota
5	Muhammad Iqbal S.Pd	L	Simalanggang, 06 Februari 1992	Kubu Gadang
6	Novil Saputra S.Pd	L	Koto Lamo/ 7 April 1993	Koto Tangah Kec Kapur IX Kab Lima Puluh Kota
7	Wedi. S	L	Tanjung Pati/25 Januari 1990	Jl. Raya Negara KM. 11. Simpang. Gor Sungai Harau 50 Kota
15. PELAMAR GURU T I K
NO	NAMA PELAMAR	L/P	TTL	ALAMAT
1	Esi Violeta	P	Koto gadang/05 Januari 1992	Simpang Ampek Jorong Koto Gadang
2	Hagi Nofiandri	L	Aro Kandikir/ 07 November 1994	Aro Kandikir Gadut, Tilatang Kamang, Kabupaten Agam
3	Muhammad Hamdi Kautsar	L	Ronah Mahat, 31 Agustus 1992	Koto Baru Simalanggang Kab Lima Puluh Kota
4	Tisa Impiani Yunasmi	P	Payakumbuh/19 April 1992	Kompi C, Sarilamak, Harau
5	Zaimul Ardi	L	Pasir Lawas, 10 Maret 1991	Pasir Lawas, Kec Sungai Tarab, Kab. Tanah Datar
16. PELAMAR GURU SENI BUDAYA
NO	NAMA PELAMAR	L/P	TTL	ALAMAT
1	Fajri Jaya, S.Pd	L	Pangkalan 09 Maret 1992	Manggilang, Kec Pangkalan koto baru
17. PELAMAR SEBAGAI PEMBINA ASRAMA
NO	NAMA PELAMAR	L/P	TTL	ALAMAT
1	Imam Awaludin, S.Hum	L	bandung/27 juni1998	Pasirhuni 01/02 cimaung kab Bandung
2	Maska Wira Efrizon, S.Sos	L	Padang, 18 April 1993	Jl. Dr Moh Hatta No 51 RT/RW 003/004 Kel Binuang Kampung Dalam Kec. Pauh Kota Padang
3	Rahma Dwi Kurnia, S.Pd	P	Solok/10 Maret 1993	Jl. Kirap Remaja Gawan Rt/Rw ooi/004, Kel. Tanah Garam,Kec. Lubuk Sikarah Kota Solok
4	Suci Zulhijjah	P	Batusangkar/ 10 Mei 1995	Jl. Bandes Parak Jigarang RT/RW 04/IV Kel. Anduring Kec. Kuranji Padang
5	Syukra Vadihillah, S.Pd.I	P	Magek/ 16 Februari 1992	Koto Kaciak Magek Kec. Kamang Magek, kab. Agam, Sumatra Barat
6	Mutia Rahmi	P	Payakumbuh, 28 Februari 1994	Jl. Balai no 726, RT 03/RW 01, kel. Ibuh, Payakumbuh
18. PELAMAR SEBAGAI TENAGA KESEHATAN
NO	NAMA PELAMAR	L/P	TTL	ALAMAT
1	Ns. Valdo Sutra S.Kep	L	Batu Raja/ 17 Agustus 1990	Ambung Kapur Kecamatan VII Koto Sungai Sarik, Padang Pariaman
2	Ridwanil Fadili	P	Padang Panjang/20 Juli 1993	Jr. Balai Akad Nagan Bungo Tanjuang, Kec. Batipuh, Kab. Tanah Datar
3	Miftahul Rahmi, A.Md, Kep	P	Tabek Panjang, 16 Juni 1993	Simalanggang,Kec Payakumbuh,Kab 50 Kota
4	Vinny Ariesta Pishesa	P	Pekan Selasa/ 30 Maret 1993	Aia Manyuruak, lb gadang selatan, kec. Sangir kab solok selatan
5	Yenggi Fermadi	L	Payakumbuh, 22 Januari 1991	Jl Tan Malaka , kel. Tanah Mati, Payakumbuh
19. PELAMAR SEBAGAI TENAGA ADMINISTRASI
NO	NAMA PELAMAR	L/P	TTL	ALAMAT
1	Deviria Agustin, S.Pd	P	Padang Luar/ 15 Agustus 1992	Parabek, Kec. Banuhampu, Kab. Agamk
2	Diah Atika Putri S.E	P	Payakumbuh/ 24 Februari 1991	Jl. Beringin No.80 Padang Tiakar Hilir Payakumbuh
3	Fadhilah Liyasnur	P	Cacang Randah/23 Juli 1994	Balai Jirak jr. Cacang Randah, Desa Tiku Utara, Kec. Tj.Mutiara, Kab. Agam
4	Grace Valentino	P	Padang, 19 September 1986	Kel. Padang Kaduduak, Kec. Payakumbuh Utara, Payakumbuh
5	Khairunnisa', SE	P	Sungai Batang/ 23 Oktober 1993	Sungai Batang, Tj. Raya, Kab. Agam
6	Martika Handayani, S.Pd	P	Indrapura , 26 Maret 1994	Pesisir Selatan
7	Mulyani, S.Pd	P	Pekanbaru/ 25 Oktober 1992	Jl. Koto Layan RT 01 RW 01 Kel. Koto Selayan, Kec. Mandiangin Koto Selayan, Bukittinggi
8	Rizka ayu Edtavia,SE	P	Duri /15 Agustus 1994	Jl Paus Gg Al-Azhar no 1 Pekanbaru
9	Utari Ariesti Yayu, S.Pd	P	talaok/ 12 April 1993	Perum Bungan Mas III Blok X/11, Tunggul Hitam
20. PELAMAR SEBAGAI TENAGA PERPUSTAKAAN
NO	NAMA PELAMAR	L/P	TTL	ALAMAT
1	Armalisa	P	Padang/ 05 Mei 1993	Jl. Usang Sungai Sapih
2	Lailatul Husni, S.Pd	P	Batusangkar/ 10 April 1994	Padang Laweh Kec Sungai Tarab Kab Tanah Datar
3	Muqtadirurrijal, A.Md	L	Padang/ 20 Februari 1994	Jl. Swadesi No.11 RT 005/001, Kel. Padang Besi, Kec. Lubuk Kilangan
4	Nurhasnah Wati, A.Md	P	Duri/ 11 Maret 1990	Ruko Cipta Puri Blok CC.18 Tiban, Sekupang
5	Peni Handayani, A.Md	P	Padang/ 29 Maret 1994	Tanjung Aur, RT o3 Rw 05 Kec. Koto Tangah
21. PELAMAR SEBAGAI SECURITY
NO	NAMA PELAMAR	L/P	TTL	ALAMAT
1	Aidil Satria	L	Payakumbuh/12 Januari 1993	RT 001/RW 001 Kel, Cubadak Aia , Kec. Payakumbuh Utara
2	Muhammad Hanafi	L	Padang Panjang/ 14 agustus 1992	Mungka Tangah
3	Satria Oki Putra	L	Payakumbuh, 05 Agustus 1991	Kel Tigo Koto Diate, Kec Payakumbuh Utara, Kota Payakumbuh
4	Tri Setio Harsono	L	Koto Tangah-SMLG/ 31 November 1995	Jor. Tabing Ranah, Nag. Simalanggang

Tertanda, Kepala SDM ICBS  

Read More

BELAJAR DASAR PEMROGRAMAN PASCAL

Contoh Kode Program Percabangan IF THEN Pascal

 

Sebagai contoh pertama, silahkan pelajari kode program berikut ini:

program struktur_if_then; uses crt; var   angka: integer; begin   clrscr;   angka := 10;   if (angka > 5) then     begiN      writeln('Variabel "angka" lebih besar dari 5');     end;   writeln('Belajar Pascal');   readln;  end.

Pada awal kode program saya membuat sebuah variabel “angka” dengan nilai 10 (integer). Kemudian saya memeriksa sebuah kondisi menggunakan perintah if then.
if (angka > 5) artinya saya ingin memeriksa apakah nilai dari variabel “angka” lebih besar dari 5. Jika iya, kondisi tersebut akan menghasilkan nilai TRUE. Akibatnya, kode program writeln(‘Variabel “angka” lebih besar dari 5’) akan dijalankan.
Setelah blok kondisi if selesai diproses, Pascal lanjut menjalankan kode program setelah blok if then, yakni baris writeln(‘Belajar Pascal di Duniailkom’) hingga akhir kode program yang di tandai dengan end.
Saya bisa menambahkan kode program lain di dalam blok if then, seperti contoh berikut:

program struktur_if_then; uses crt; var   angka:integer; begin   clrscr;   angka:=10;   if (angka > 5) then     begin       writeln('====================================');           writeln('Variabel "angka" lebih besar dari 5');       writeln('====================================');     end;   writeln('Belajar Pascal di');   readln; end.

Jika anda browsing atau melihat tutorial lain, kebanyakan bagian blok begin dan end; ini tidak ditulis. Jika seperti ini, perintah yang dijalankan (saat kondisi TRUE) hanya boleh 1 baris saja, seperti contoh berikut:

program struktur_if_then; uses crt; var   angka:integer; begin   clrscr;   angka:=5;   if (angka > 5) then     writeln('Variabel "angka" lebih besar dari 5');   writeln('Belajar Pascal di ');   readln; end.

Namun sangat sangat disarankan untuk selalu membuat blok begin dan end; pada setiap kondisi if, karena seperti yang terlihat dari kode program diatas, susah untuk memastikan apakah baris writeln(‘Belajar Pascal di Duniailkom’) termasuk ke dalam blok if atau tidak, yang kenyataannya memang tidak termasuk.

Hati-hati untuk menulis penutup blok if then, yakni “end;” (dengan tanda titik koma), bukan “end.” (dengan tanda titik).

Sebagai contoh yang lebih interaktif, silahkan jalankan kode program berikut:

program struktur_if_then; uses crt; var   angka:integer; begin   clrscr;   write('Masukkan sebuah angka: ');   readln(angka);   if (angka mod 2 = 0) the    begin       writeln('Angka yang anda masukkan merupakan bilangan genap');      end;       readln; end.

Kali ini saya membuat program yang meminta input dari pengguna (menggunakan perintah readln), lalu disimpan kedalam variabel angka.
Variabel angka selanjutnya saya periksa menggunakan kondisi if (angka mod 2 = 0). Anda masih ingat dengan operator mod? Operator mod akan menghasilkan sisa hasil bagi dari suatu bilangan.
Dengan menulis if (angka mod 2 = 0) artinya saya memeriksa apakah variabel angka jika dibagi 2 sisanya 0? Sebagai contoh, 4 mod 2 = 0 (sesuai dengan kondisi). 7 mod 2 = 1 (tidak sesuai dengan kondisi).
Kondisi if (angka mod 2 = 0) ini sebenarnya digunakan untuk memeriksa apakah sebuah angka termasuk genap atau tidak. Jika habis dibagi 2 (sisanya 0), artinya angka tersebut merupakan bilangan genap.
Bagaimana dengan angka ganjil? Misalkan jika diinput sebuah angka, akan lebih baik hasilnya “Angka yang anda masukkan merupakan bilangan genap” atau “Angka yang anda masukkan merupakan bilangan ganjil”. Ini akan kita pelajari dalam tutorial selanjutnya, yakni tentang perintah kondisi IF THEN ELSE di dalam bahasa pemrograman Pascal.

Read More

INFORMASI PENGUMUMAN HASIL PENERIMAAN SELEKSI INSAN CENDEKIA BROADING SCHOOL PAYAKUMBUH 2015

http://insancendekia.com/pengumuman-daftar-calon-karyawan-guru-insan-cendekia-boarding-school-payakumbuh/

Read More

CONTOH FORM ENTRI DATA PADA PHP

Berikut adalah contoh sederhana membuat form entri pada php.. barang kali banyak dari rekan-rekan yang telah paham dan telah mahir dengan bahasa pemrograman php, namun tidak ada salahnya mengulang kembali sekilas tentang php dan disini akan dibahas contoh sederhana dari php yakni membuat form entri dengan php.

baiklah langkah pertama yang harus kita lakukan adalah membuat form entrinya terlebih dahulu bisa menggunakan notepad, dreamweaver atau aplikasi lainnya yang mendukung.

sebelum kita memasuki program ada baiknya kita buat dulu sebuah database baru dengan mysql dan kita beri nama  dbpelaminan,  lalu buatlah tabel dengan nama tbpelaminan buat data nya seperti dibawah ini :

-namalengkap
-tempattinggalsekarang
-kebangsaan, agama
-pekerjaanktp
-passport
-keperluan
-berlakudari
-hingga

 type data nya disesuaikan dengan kebutuhan rekan-rekan, nama pada tbpelaminan nantinya harus disesuaikan dengan koding proses.php yang bisa rekan2 lihat dibawah kajian form entri dibawah.

setelah database kita buat maka sebelumnya kita harus membuat koneksi agar database bisa terhubung dengan program, maka kita bikin form pada php dengan nama "koneksi.php", pada form koneksi.php isikan koding dibawah ini:

=========================
mysql_connect("localhost","root","");
mysql_select_db("dbpelaminan");
?>
=========================
pastikan XAMP, WAMP, SQLserver atau konektor mysql nya semua telah terinstal dan diaktifkan , selanjutnya kita rancang form entri data seperti yang akan kita bahas dibawah ini.

pertama-tama rancang lah sebuah form seperti dibawah ini lalu berinama form entri.php.

Untuk koding form entri diatas bisa rekan-rekan download di sini :

http://www.4shared.com/office/TnFViueUce/KODING_FORM_ENTRI.html 

karena akan terlalu panjang apabila diposting.

 ======================================================================== Setelah kita selesai merancang form entri diatas maka selanjutnya kita buat form lalu  kita beri nama proses.php ,  setelah form proses.ph kita buat lalu kita rancang koding program seperti dibawah ini yang fungsinya nanti akan memproses data yang di input dari form yang telah kita buat diatas sebelumnya. untuk lebih jelasnya koding proses.php bisa kita lihat dibawah ini :

Proses.php

=========

$rid=$_POST['nm'];

$red=$_POST['tts'];

$sad=$_POST['kbs'];

$sid=$_POST['agm'];

$sud=$_POST['pkrj'];

$sed=$_POST['ktp'];

$vkep=$_POST['kep'];

$vtgl2=$_POST['tgl2'];

$vbln2=$_POST['bln2'];

$vthn2=$_POST['thn2'];

$vtgl3=$_POST['tgl3'];

$vbln3=$_POST['bln3'];

$vthn3=$_POST['thn3'];

include "koneksi.php";

$query="INSERT INTO tbpelaminan ( namalengkap,  tempattinggalsekarang, kebangsaan, agama, pekerjaan, ktppassport, keperluan , berlakudari, hingga) values ('$rid', '$rud', '$red', '$sad', '$sid', '$sud', '$sed', '$vkep', '$vthn2-$vbln2-$vtgl2', '$vthn3-$vbln3-$vtgl3')";

$result =mysql_query($query) or die (mysql_error());

echo " DATA TELAH MASUK";

echo "";

?>

========================================================================
setelah koding diatas dibuat coba jalankan program, kemudian isi data. apabila ada kesalahan coba cek kembali data yang kita buat apakah sudah sama dengan database dan jangan lupa perhatikan tanda baca pada coding program.
baiklah  pada proses ini pembuatan form entri telah selesai, silahkan rekan-rekan coba dan kreasikan, untuk menampilkan data insya allah pada kesempatan berikutnya akan kita lanjutkan kembali. semoga bermanfaat. :) wasssalam.

Read More

CONTOH KODING UNTUK TEXT BERJALAN PADA FORM VBNET 2010

untuk membuat text bergerak pada form dalam VB NET 2010 caranya cukup mudah,  pada form load ketikkan beberapa baris source coding yang diperlukan.  untuk lebih jelasnya SILAHKAN COPAS Koding dibawah ini kedalam projek teman-teman :


TEXT BERJALAN
========================================================================

DI FORMLOAD
=================

tulisan(0) = "JUDUL"
        tulisan(1) = "JUDUL"
        tulisan(2) = "JUDUL"
        Label1.Text = tulisan(j)
        Timer2.Start()


DI TIMEPICKER
==============

Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
        If i.Equals(tulisan(j).Length) Then
            Me.Label1.Text = ""
            If j < tulisan.Length - 1 Then
                j = j + 1
            Else
                j = 0
            End If
            i = 0
        End If
        Label1.Text = tulisan(j).Substring(0, i)
        i = i + 1
    End Sub

========================================================================
Semoga Bermanfaat.....   :)  Notice bila ada keterangan kurang jelas silahkan berikan komentar agar bisa kita diskusikan bersama.... trims :)

 By Leo Bahana Batubara, S.Kom

Read More

Koding Laporan Pada CrystalReportViewer VBNET 2010

Ketikkan Koding berikut ini pada button Cetak :

crystalReportViewer1.ReportSource=.Laporan1.rpt
CrystalReportViewer1.SelectionFormula="({})"="Textbox1.text"
CrystalReportViewer1.Refresh
CrystalReportViewer1.Show


Nama Laporan dan Peletakan untuk formula disesuaikan dengan yang anda bikin di form cetak laporan anda.  :)


Semoga membantu   by Leo Bahana Batubara

Read More

CONTOH KODING VB NET 2010 ( DISESUAIKAN DENGAN MILIK ANDA )

modul///
Imports System.Data
Imports System.Data.Odbc
Module Module1
    Public database As Odbc.OdbcConnection
    Public Tb As Odbc.OdbcDataAdapter
    Public Data As DataSet
    Public Rcd As New BindingSource
    Public perintahsql As New Odbc.OdbcCommand
    Public Cari As Odbc.OdbcDataReader
    Public Sub Koneksi()
        Try
            database = New Odbc.OdbcConnection("Dsn=koneksi")
            database.Open()
            MsgBox("berhasil terkoneksi Lanjutkan")
        Catch ex As Exception
            MsgBox(ex.ToString())
        End Try
    End Sub
End Module

//simpan

   Try
                Call Koneksi()
                Dim cmd As New OdbcCommand("insert into tbps values('" & TextBox1.Text & "','" & TextBox2.Text & "')", database)
                cmd.ExecuteNonQuery()
                MsgBox("tersimpan kedatabase")
                tampil()
                KodeOtomatis1()
                'bersih()

            Catch ex As Exception
                MsgBox("ada kesalahan" + ex.Message)
                'bersih()
            End Try

koreksi////
 Call Koneksi()
        Dim ubah As String = "update  tbps set jns_ps = '" & TextBox2.Text & "' where kd_ps= '" & TextBox3.Text & "'"
        perintahsql = New Odbc.OdbcCommand(ubah, database)
        perintahsql.ExecuteNonQuery()
        MsgBox("data telah dubah")
        tampil()


HAPUS////
 Call Koneksi()
        Dim hapus As String = "delete from tbps where kd_ps='" & TextBox3.Text & "'"
        perintahsql = New Odbc.OdbcCommand(hapus, database)
        perintahsql.ExecuteNonQuery()
        MsgBox("data telah dhapus")
        tampil()


TAMPIL////

 Sub tampil()
        Call Koneksi()
        Tb = New OdbcDataAdapter("select * from tbps ", database)
        Data = New DataSet
        Tb.Fill(Data, "tbps")
        dg1.DataSource = Data.Tables("tbps")
        dg1.ReadOnly = True
        dg1.Refresh()
    End Sub


CARI////

 ' TextBox1.Clear()
        'TextBox2.Clear()
        'TextBox3.Clear()
        ' TextBox4.Clear()
        Dim str As String
        str = "select*from tbps where (kd_ps='" & TextBox3.Text & "')"
        Dim cmd As OdbcCommand = New OdbcCommand(str, database)
        Cari = cmd.ExecuteReader
        While Cari.Read
            TextBox3.Text = Cari("kd_ps").ToString
            TextBox2.Text = Cari("jns_ps").ToString
         

        End While
        'database.Close()
    End Sub


////PANGGIL DATA KE KOMBO///

 ' Call Koneksi()
        Dim cmd As New OdbcCommand("select *from tbpaket where kdpaket='" & c2.Text & "'", database)
        Cari = cmd.ExecuteReader()
        ' c1.Items.Clear()
        Do While Cari.Read
            c2.Items.Add(Cari("kdpaket"))
            t2.Text = Cari("nmpaket")
            t3.Text = Cari("hrgpaket")
            t4.Text = Cari("durasi")

        Loop
        TextBox1.Text = Val(t3.Text) * Val(t4.Text) / 60
        t9.Text = Val(TextBox1.Text)


///KODE OTOMATIS///

 Sub KodeOtomatis1()
      Try
            TextBox1.Text = "S001"
            Koneksi()
            perintahsql = New Odbc.OdbcCommand("SELECT CONCAT( 'S' ,LPAD(( RIGHT( MAX(kd_ps),3)+1),3,'0')) as ps FROM tbps", database)
            Cari = perintahsql.ExecuteReader

            If Cari.Read Then
                TextBox1.Text = Cari.Item("ps")
            Else
                TextBox1.Text = "S001"
            End If
        Catch ex As Exception
            MsgBox(ex.Message, MsgBoxStyle.Exclamation)
        End Try
    End Sub

Read More