danikustiawan.id - Halo sobat semua, kali ini DK kembali dengan artikel tutorial untuk pemrograman Pascal. Sebelumnya sobat bisa tentu sudah mengetahui dasar-dasar dari pemrograman Pascal, jadi DK di sini tidak akan menjelaskan lagi hal tersebut.

Oke, DK untuk kali ini akan membagikan tutorial sederhana implementasi dari aritmatika dalam pemrograman Pascal. Kita akan menuangkannya dalam Program Penghitung Luas Segitiga. Berikut script untuk program penghitung luas segitiga dengan pascal.

program luas_segitiga;
uses wincrt;
var
a,t: real;
L: real;
begin
clrscr;
write('Masukan Nilai Alas:');
readln (a);
write('Masukan Nilai Tingi:');
readln(t);
writeln(' ');
L:=(a*t)/2;
writeln('Luas Segitiga adalah =',L:6:2);
readln;
end.

Next, setelah mengetikan script di atas kita jalankan program dengan menekan Ctrl + F9, berikut hasilnya :
Ini adalah tampilan awal saat program dijalankan. User akan diminta untuk memasukan nilai dari alas segitiga.
Sebagai contoh kita masukan angka 5 untuk nilai alas lalu tekan enter, maka program akan meminta inputan kembali untuk nilai tinggi segitiga, masukan 12 dan tekan enter. Program akan secara otomatis menghitung luas segitiga.

Sebagaimana diketahui rumus luas segitiga adalah L=(a x t)/2. Untuk membuktika apakan hitungan dari program ini benar, mari kita hitung bersama.
L=(5 x 12)/2
L=60/2
L=30

Hasil perhitungan manual dan program pencari luas segitiga ternya sama, artinya program ini berjalan dengan benar. Oke sekian untuk tutorial sederhana kali ini. Sobat semua bisa download program penghitung luas segita melalui link di bawah. Semoga berguna.

Download Program Penghitung Luas Segitiga

「Dani Kustiawan」

foto : bobotoh.id

danikustiawan.id - Persib Bandung menggelar laga uji coba melawan Persika Karawang. Laga ini berlangsung sore tadi (5/4) di Stadion Gelora Bandung Lautan Api (GBLA). Pada laga ini Persib berhasil menggulung Persika dengan skor telak 7-0.

Persib menurunkan tiga pemain mudanya Agung, Basith, dan Henhen untuk menjadi starter. Terlihat Djajang Nurdjaman melakukan simulasi untuk Liga 1 nanti dengan menurunkan tiga pemain ini sebagai starter. Di babak pertama sendiri Persib berhasil unggul 2-0. Kedua gol Persib dicetak oleh Dedi Kusnandar.

Gol ketiga Persib dicetak oleh Atep saat babak kedua baru berjalan. Tendangan volly hasil umpan Supardi merubah skor menjadi 3-0 untuk Persib. Sepuluh menit berselang giliran Atep memberikan umpan dari tendangan sudut yang berhasil ditanduk Matsunaga ke gawang Persika, 4-0 Persib unggul.

Ketiga pemain anyar Persib, Essien, Cole, dan Maitimo baru diturunkan setelah babak kedua berjalan beberapa menit. Essien mencetak gol di menit ke-78 untuk merubah skor menjadi 5-0. Di menit 84 giliran Maitimo unjuk kebolehan dengan mencetak gole keenam Persib melalui tendangan bebas. Tak ingin kalah dari dua pemain anyar lain, Cole akhirnya mencetak gol ketujuh Persib dan menutup kemenangan 7-0 Persib atas Persika.

「Dani Kustiawan」

danikustiawan.id - Gelaran MotoGP 2017 telah dimulai pada 26 Maret 2017. Seri pembuka MotoGP 2017 digelar di Sirkuit Losail Qatar yang dimenangkan oleh Maverick Vinales. Kini MotoGP akan segera memasuki seri kedua yang akan digelar di Argentina.

MotoGP 2017 memiliki total 18 seri yang akan dijalani sepanjang musim ini. Negara yang paling banyak menggelar seri MotoGP adalah Spanyol dengan 4 seri, disusul Italia dengan 2 seri. Sisanya penyelenggaran MotoGP masing-masing satu negara berbeda.

Bagi fans MotoGP yang tidak ingin terlewatkan keseruan dari pertarungan para rider berikut DK berikan jadwal lengkap MotoGP 2017 yang disiarkan secara langsung oleh Trans 7.



「Dani Kustiawan」

danikustiawan.id - Sang juara bertahan CLS Knights Surabaya melaju ke semifinal setelah menghadapi perlawanan sengit Bank BJB Garuda Bandung. Game penentuan ini merupakan lanjutan dari dua game awal di putaran pertama Playoff IBL Pertalite 2017 karena kedua tim saling mengalahkan.

Garuda sebenarnya mampu unggul di babak pertama. Mengawali laga dengan keunggulan 6-0, Garuda terlihat meyakinkan dan unggul tipis atas CLS Knights di kuarter pertama dengan skor 13-12. Kuarter kedua masih menjadi milik Garuda dengan keunggulan 25-20.

Memasuki kuarter ketiga, CLS Knights masih tertinggal dari Garuda. Baru pada tiga menit akhit kuarter ketiga, CLS Knights mampu unggul mengakhiri babak ini dengan skor 40-34. Pertandingan semakin memanas di kuarter terakhir. Garuda berusaha mengejar angka CLS Knights. Setelah mampu menyamakan kedudukan di pertengahan kuarter empat dengan skor 41-41, CLS Knights mampu kembali menjauh. Garuda tidak mampu lagi mengejar perolehan angka CLS Knights dan menyudahi perlawanan Garuda dengan skor akhir 61-52.

Crews mencatat double-double bagi CLS dengan 17 angka dan 15 rebound, pemain asing lainnya, Ashton Smith juga mencetak double-double 14 poin dan 12 rebound. Arif Hidayat menjadi pemain lokal paling moncer dengan raihan 15 angka.

danikustiawan.id  - Laga hidup-mati yang akan menetukan tim mana yang lolos ke babak semifinal di putaran pertama playoffs IBL 2017 Divisi Merah. Laga ketiga yang mempertemukan CLS Knights Surabaya dengan Bank BJB Garuda Bandung ini merupakan laga tambahan karena kedudukan saat ini adalah 1-1. Garuda berhasil menang di game pertama, sedangkan CLS Knights membalas di game kedua.

GOR Kertajaya Surabaya akan menjadi saksi bagaimana pertarungan kedua tim. Pendukung CLS Knights tentu akan memenuhi GOR Kertajaya untuk memberikan dukungan dan memberika "teror" bagi pemain Garuda.

Bagi sobat semua yang tidak bisa datang secara langsung ke GOR Kertajaya bisa menyaksikan pertandingan melalui live streaming YouTube IBL TV dan IndiHome. Untuk streaming melalui IBL TV, bisa disaksikan di bawah ini. Pertandingan akan berlangsung mulai pukul 19.00 WIB. Enjoy the game!


「Dani Kustiawan」