free pascal
Pascal adalah bahasa pemrograman yang pertama kali di buat oleh Profesor Niklaus Wirth, seorang anggota International Federation of Information Processing (IFIP) pada tahun 1971. Dengan mengambil nama dari matematikawan Perancis, Blaise Pascal, yang pertama kali menciptakan mesin penghitung, Profesor Niklaus Wirth membuat bahasa Pascal ini sebagai alat bantu untuk mengajarkan konsep pemrograman komputer kepada mahasiswanya. Selain itu, Profesor Niklaus Wirth membuat Pascal juga untuk melengkapi kekurangan-kekurangan bahasa pemrograman yang ada pada saat itu.
Klik show untuk melihat
Kelebihan
Kelebihan dari bahasa pemrograman Pascal adalah:
Tipe Data Standar, tipe-tipe data standar yang telah tersedia pada kebanyakan bahasa pemrograman. Pascal memiliki tipe data standar: boolean, integer, real, char, string,
User defined Data Types, programmer dapat membuat tipe data lain yang diturunkan dari tipe data standar.
Strongly-typed, programmer harus menentukan tipe data dari suatu variabel, dan variabel tersebut tidak dapat dipergunakan untuk menyimpan tipe data selain dari format yang ditentukan.
Terstruktur, memiliki sintaks yang memungkinkan penulisan program dipecah menjadi fungsi-fungsi kecil (procedure dan function) yang dapat dipergunakan berulang-ulang.
Sederhana dan Ekspresif, memiliki struktur yang sederhana dan sangat mendekati bahasa manusia (bahasa Inggris) sehingga mudah dipelajari dan dipahami.
Bahasa PASCAL juga merupakan bahasa yang digunakan sebagai standar bahasa pemrograman bagi tim nasional Olimpiade Komputer Indonesia (TOKI). Selain itu, Bahasa PASCAL masih digunakan dalam IOI (International Olympiad in Informatics)
http://www.mesran.blogspot.com Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim x As String No_urut.Text = "1" & Microsoft.VisualBasic.Right(KODE.Text, 2) x = Microsoft.VisualBasic.Mid(KODE.Text, 4, 3) If x = "MED" Then daerah.Text = "MEDAN" pajak.Text = 0.015 ElseIf x = "BEL" Then daerah.Text = "BELAWAN" pajak.Text = 0.015 ElseIf x = "TEM" Then daerah.Text = "AKSARA" pajak.Text...
http://www.mesran.blogspot.com/ Class Form1 Sub buattabel() LV.Columns.Add("NPM", 80, HorizontalAlignment.Center) LV.Columns.Add("Nama", 180, HorizontalAlignment.Left) LV.View = View.Details LV.GridLines = True LV.FullRowSelect = True End Sub Sub isitabel() Dim lst As New ListViewItem lst.Text = NPM.Text lst.SubItems.Add(Nama.Text) LV.Items.Add(lst) End Sub Private Sub Label1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As S...
Elgamal Algoritma elgamal dibuat oleh Taher ElGamal pada tahun 1984. Algortima ini pada mulanya digunakan untuk digital signature, namun kemudian dimodifikasi sehingga juga bisa digunakan untuk enkripsi dan dekripsi. ElGamal digunakan di dalam perangkat lunak sekuriti yang dikembangkan oleh GNU, program PGP, pada sistem sekuriti lainnya. Keamanan algoritma ini terletak pada sulitnya menghitung algoritma diskrit. Masalah logaritma diskrit. Jika p adalah bilangan prima dan g dan y adalah sembarang bilangan bulat. Carilah x sedemikian sehingga g^(x )= y(mod p) Besaran-besaran yang digunakan di dalam algoritma ElGamal adalah : Bilangan prima, p (tidak rahasia) Bilangan acak, g(g<p) (tidak rahasia) Bilangan acak, x(x<p) (tidak rahasia) y= g^(x )mod p (tidak rahasia, k, publik) m(plainteks) (rahasia) a dan b (chiperteks) (tidak rahasia) Contoh Kasus Dimisalkan contoh kasus teks dalam agenda pribadi atau plainteks dengan nama “DHARMA” sebelum melakukan pro...
Komentar
Posting Komentar