Minggu, 06 Oktober 2013

Apasih IF Pada Pascal


Apasih fungsi IF itu ?
Jadi fungsi IF itu sesuai dari bahasa inggris IF=JIKA, maka bisa dijelaskan fungsi if adalah untuk memberikan sebuah pernyataan mengenai benar atau salah hal yang di ujikan ,atau memberikan untuk proses selanjutnya,atau bisa lagi dikatakn guna IF adalah untuk mengambil sebuah keputusan.
Salah Satu contoh IF :

sambungannya
Jika sudah run dan akan menampilkan seperti gambar di bawah ini,
lalu masukan input "misalnya P" dan jumlah barang yang di beli  LALU ENTER, maka akan menghasilkan seperti gambar dibawah ini
Jadi IF ini bisa di lihat dapat memberikan suatu arahan kebenar maupun salah, berdasar kan input yang telah di maksud kan, If terdiri dari STATEMENT 1 yang bersifat benar , dan STATEMENT 2 Setelah ELSE  sebaliknya ,

Rabu, 18 September 2013

Mengenal Turbo Pascal dan Pengaplikasiannya Dengan Phytagoras


Assalamualaikum Wr wb .. 
Apa itu  Pascal ?
Pascal merupakan suatu bahasa komputer tingkat tinggi yang dibuat sekitar tahun 1970 oleh Niklaus Wirth dan digunakan untuk pendidikan komputer. Nama Pascal
diambil dari seorang ahli matematika yang bernama Blaise Pascal yang menemukan
mesin hitung pertama. Bahasa Pascal dirancang untuk menyelesaikan masalah dari
berbagai kalangan pemakai, mulai dari para mahasiswa, pendidik, dan ilmuwan.     Pascal adalah suatu bahasa pemrograman terstruktur. Hal tersebut berarti semua program yang anda buat harus terstruktur dan teratur, dalam hal ini ada pemakaian goto dan jump
-       Struktur program pascal yang paling sederhana adalah :
uses ...;
var ...;
begin
.... {Your program is here}
end.
Program heading
Judul program dalam Turbo Pascal bersifat optional dan tidak ada pengaruhnya dalam
program. Jika ditulis akan memberikan nama program dan suatu daftar parameter
optional dimana program itu berkomunikasi. Daftar itu terdiri dari sederetan
indentifier yang diakhiri dengan tanda kurung dan dipisahkan dengan tanda koma
Uses Clause
Bagian uses clause digunakan untuk menentukan library yang dibutuhkan saat proses program. LIBRARY merupakan file penyimpan subroutine yang secara berulang
digunakan saat proses program. Library ini diistilahkan sebagai unit dalam Turbo
PASCAL yang terdiri dari SYSTEM, OVERLAY, GRAPH, DOS, CRT yang ditempatkan
dalam file TURBO.TPL.

Contoh :
Uses Crt; (*menggunakan Unit Crt *)
Declaration
Bagian ini meliputi deklarasi untuk label, const, type, var, procedure dan function
Syarat terpenting dalam pembentukan suatu program adalah, bahwa setiap variabel,type non-standard, label, procedure non-standard, serta function non-standard yang dipakai didalamnya harus nyatakan (deklarasi) terlebih dahulu pada bagian deklarasi. Setiap deklarasi tersebut harus bersifat unik (tidak boleh serupa satu sama yang lain).
Penulisan nama dalam deklarasi tersebut harus memenuhi syarat-syarat sebagai
berikut :
- panjang nama maximum 63 character, diawali dengan alphabet
- tidak ada special character kecuali tanda garis bawah ("_")
- tidak boleh serupa dengan reserved word (kata tercadang)
- tidak boleh serupa dengan indentifier lainnya.
Variabel Declaration
Setiap variabel yang digunakan dalam program harus didefinisikan terlebih dahulu
sebelum digunakan. Cara penulisan ini adalah :
Var
: ;
Type data apa saja yang disediakan Turbo Pascal ?
Adapun type variable yang disediakan pada TURBO PASCAL :

1.Ordinal types
Type data yang mempunyai urutan pasti, dan masih terbagi menjadi
- Integer
Type variable yang beguna untuk pengolahan data yang bulat, type ini masih terbagi
atas berberapa menurut jangkauan data dan ukurannya :
Type                Jangkuan                                Ukuran
Shortint           -128..127                                 8 bit
Integer             -32768..32767                         16 bit
Longint           -2147483648..2147483647     32 bit
Byte                0..255                                      8 bit
Word               0..65535                                  16 bit
Char
Type variabel yang berguna untuk pengolahan character ASCII, type character ini
penulisannya ditandai dengan dua buah petik tunggal seperti : 'A', '3','*',#7 untuk
menyatakan ' harus ditulis ''''

Boolean
Type varibale yang berguna untuk pengolahan hal yang hanya mempunyai dua
ketentuan yaitu benar(TRUE) dan salah(FALSE) saja.

2.Real types
Type variable yang beguna untuk pengolahan data yang tidak bulat, untuk type real
ini juga terbagi atas beberapa :
Type variable yang beguna untuk pengolahan data yang tidak bulat, untuk type real
ini juga terbagi atas beberapa :
Type                Jangkauan                   Ketelitian                    Ukuran
Real                 2.9e-39..1.7e38 11-     12 digit                        6 bit
Single             1.5e-45..3.4e38 ³ 7-8   7-8 digit                      4 bit
Double            5.0e-324..1.7e308       15-16 digit                  8 bit
Extended        3.4e-4932..1.1e4932   19-20 digit                  10 bit
Comp             -9.2e18..9.2e18           19-20 digit                  8 bit


Operator          Integer Type    Real Type
+                      Penjumlahan    Penjumlahan
-                       Pengurangan   Pengurangan
*                      Perkalian         Perkalian
/                       Pembagian       Pembagian
DIV                 Hasil bagi
MOD               Sisa Bagi

NOT Bitwise Negation Logical Negation
AND Bitwise AND Logical AND
OR Bitwise inclusive OR Logical inclusive OR
XOR Bitwise exclusive OR Logical exclusive OR
SHL Bitwise shift-left
SHR Bitwise shift-right

Operator relasi yang mengembalikan hasil Boolean
Operator                      Fungsi
:=                     Menyatakan nilai
=                      Sama dengan
<>                    Tidak sama dengan
<                      Lebih kecil
>                      Lebih besar
<=                    Lebih kecil atau sama dengan
>=                    Lebih besar atau sama dengan

Pascal menyediakan perintah Write dan Writeln yang dapat anda gunakan untuk
menampilkan tulisan ke layar.
Perintah Readln dapat digunakan untuk membaca masukan dari pemakai dan
menyimpannya ke suatu variabel.
(Sumber : )

Berikut ini ada salah satu program pascal dalam bentuk phytagoras
Contoh : 

Masukan seperti gambar dibawah ini :


Setelah lengkap lalu tekan ALT+F9 untuk mengetahui kelengkapan input yang telah di ketikan di pascal , jika ada kesalahan maka akan ada gambar pemberitahuan seperti gambar dibawah ini


Jika Sudah lengkap seperti gambar dibawah ini 

tekan "Run" lalu akan masuk sepeti gambar dibawah ini


masukan sisi tegak 8, sisi datar 6 lalu enter , maka akan muncul jawaban sisi miring nya = 10 

Program ini (phytagoras ) merupakan salah satu contoh dalam pemanfaatan program pascal 
terimakasih atas perhatiannya . wassalamualaikum wr wb

Minggu, 04 Agustus 2013

"Fly Emirates" Jersey Mendunia


AYOOOOO GOOOOOLLL
Sepakbola selalu identik dengan bola , pemain dan score , namun ada hal menarik lain yaitu JERSEY (Kostum Bertanding), kadang beberapa team memiliki banyak jersey untuk di pakai baik home away dan jersey ketiga, dan jersey ini setiap tahun berganti , baik warna da style
Jika membicarakan jersey , tidak ada habisnya karna semua team, club atau Negara memiliki jersey mereka masing masing . kali ini yang menjadi sorotan saya adalah “Sponsor Utama Di depan Jersey”
Sponsor utama Di depan jersey biasanya bermacam macam , dari perusahan makanan , minyak , dan lain lain . Salah satu yang menyita perhatian saya adalah Perusahan Emirates . kenapa ? menjawab pertanyaan “kenapa itu ” maka silahkan gulung tulisan saya lebih lanjuttt hahaha

“apa itu Emirates ”
Emirates adalah Maskapai Penerbangan di Bandara Internasional Dubia , Uni Emirate Arab Kepemilikan pemerintah Dubai.
Didirikan Mei 1985,selalu berkembang hingga sekarang telah menjadi salah satu maskapai termewah di DUNIA. Pelayanan dan arsitektur yang megah membuat peumpang yang berdompet tebal layak mencoba kenyamanan Maskapai di dubai  (Kenapa Promosi nah ?)
“Apa Hubungannya dengan bola ?”
Maskapai terbang Dubai memang sangat tidak berhubungan dengan bola itu sendiri, namun yang menjadi berhubungan adalah slogan mereka “FLY EMIRATES” yang muncul cukup menakjubkan di berbagai jersey team elit dunia .
“ bukti ?”  





1.       Arsenal
Siapa yang tidak kenal arsenal ,team liga inggris yg selalu menghasilkan talenta muda dunia seperti Fabregas,Walcot,Arshavin,Van Persie, dan lain lain , Team ini salah satu team yang mempunyai Jersey dengan Slogan “FLY EMIRATES” , bahkan emirates sendiri telah mengucurkan banyak dana untuk membangunkan Stadion Baru untuk Arsenal  yang sekarang bernama Emirates Stadium





2.       AC Milan
AC milan  team yang sukses di di era Kaka dan Maldini , sekarang sedang bangkit , kebangkitan ini harus di imbangi dengan pasokan dana yang mencukupi dari sponsor, salah satu sponsor yang mau memberikan dana nya adalah “FLY EMIRATES” bahkan emirates sendiri tercantum di paling depan Jersey AC MILAN




3.       PSG
PSG ?  mengingat team ini pasti teringat akan pasokan dana yang melimpah , karena team yang sekian tahun puasa gelar akhirnya bisa menjadi juara ligue Prancis 2013. Salah Satu yang menjadi Sponsor adalah “Fly Emirates ” seperti yang terlihat di jersey kembali lag emirates lah yang menjadi sponsor paling depan di jersey tersebut , entah berapa uang yang di sodorkan emirates untuk mendapatkan jersey PSG



4.       Hamburg SV
Team ini memang tidak begitu terkenal , namun team ini adalah kuda hitam yang cukup menarik di liga Germany , betapa tidak , team ini bahkan memiliki pemain berkelas dunia seperti DRAXLER, namun memang team ini masih belum bisa menyaingi team berkelas seperti Bayern Munchen ,




5.       Real Madrid
Percaya atau tidak tahun depan tim bertabur bintang ini akan mengenakan Jersey Bertuliskan FLY EMIRATES , dengan adaanya jersey ini maka menambah lengkap team yang di sponsori oleh maskapai terbang dubai

Mungkin Emirates memang benar benar “FLY” didunia sepakbola, secara ringkas kita bisa lihat , dengan jersey “FLY EMIRATES” di dada nya berasal dari berbagai Negara yang terkenal dengan sepakbola nya , lihat saja arsenal(liga inggris),Ac Milan(Liga italia), Real Madrid (Espanyol), PSG (Liga Prancis) , dan Hamburg (liga German) , Bahkan secara sengaja atau tidak sengaja club  yang di pilih Emirates adalah   club yang di juluki “kota Fashion”  dunia.
Emirates sangat jeli dengan mensponsori team team tersebut , selain mendapatkan nama dikalangan pecinta bola , sekaligus menambah omset tambahan , karena setiap pembelian jersey asli tentu uang juga akan mengalir ke saku EMIRATES,.
Mungkin maskapai ini akan menambah kembali club club bola yang akan “FLY ” hahahaha