contoh sintak pada bahasa pemograman paskal, c++,delphi 7,visual basic 6.

Program paskal

uses wincrt; var kd_bln : integer; begin write ('silakan masukan kode bulan [1..12] : ');readln(kd_bln); if (kd_bln = 2) then writeln('jumlah hari 28 atau 29') else if ( kd_bln = 1) or (kd_bln = 3) or ( kd_bln = 5) or (kd_bln = 7) or ( kd_bln = 8) or (kd_bln = 10) or (kd_bln = 12)then writeln('jumlah hari 31 ') else if ( kd_bln = 4) or (kd_bln = 6) or ( kd_bln = 9) or (kd_bln = 11)then writeln('jumlah hari 30 ') else writeln('maaf,anda salah memasukan kode bulan'); end.

program c++

#include <iostream.h> main () { int kd_bln; cout<<" silakan masukan kode bulan [1..12] : "; cin>>kd_bln; if (kd_bln == 2 ) cout <<"jumlah hari 28 atau 29 \n"; else if (kd_bln == 1 || kd_bln == 3|| kd_bln==5 || kd_bln==7 || kd_bln==8 ||kd_bln==10 ||kd_bln==12) cout<<"jumlah hari 31 \n"; else if (kd_bln ==4 || kd_bln == 6 || kd_bln == 9 || kd_bln ==11) cout<<" jumlah hari 30 \n"; else cout << " maaf salah memasukan kode bulan \n"; }

Delphi 7

unit Unit1; interface uses   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,   Dialogs, StdCtrls; type   TForm1 = class(TForm)     Button1: TButton;     edit1: TEdit;     Label1: TLabel;     Label2: TLabel;     procedure Button1Click(Sender: TObject);   private     { Private declarations }   public     { Public declarations }   end; var   Form1: TForm1;    kd_bln:integer; implementation {$R *.dfm} procedure TForm1.Button1Click(Sender: TObject); begin kd_bln:= strtoint(edit1.Text); if (kd_bln = 2) then label1.caption:='jumlah hari 28 atau 29' else if ( kd_bln = 1) or (kd_bln = 3) or ( kd_bln = 5) or (kd_bln = 7) or ( kd_bln = 8) or (kd_bln = 10) or (kd_bln = 12)then label1.caption:='jumlah hari 31' else if ( kd_bln = 4) or (kd_bln = 6) or ( kd_bln = 9) or (kd_bln = 11)then label1.caption:='jumlah hari 30' else label1.caption:='maaf,anda salah memasukan kode bulan'; end; end.

Visual basic 6

Private Sub Command1_Click() Dim kd_bln As Integer kd_bln = Val(Text1) If (kd_bln = 2) Then Label1.Caption = "Jumlah hari 28 atau 29" Else If (kd_bln = 1) Or (kd_bln = 3) Or (kd_bln = 5) Or (kd_bln = 7) Or (kd_bln = 8) Or (kd_bln = 10) Or (kd_bln = 12) Then Label1.Caption = "Jumlah hari 31" Else If (kd_bln = 4) Or (kd_bln = 6) Or (kd_bln = 9) Or (kd_bln = 11) Then Label1.Caption = "Jumlah hari 30" Else Label1.Caption = "maaf,anda salah memasukan kode bulan" End If End If End If End Sub

1.       Penggunaan file header.di Paskal  menggunakan file header uses wincrt .  untuk di C++ menggunakan file header include <iostream.h>, include <stdio.h>  dan masih banyak lagi file header yang ada di c++. Untuk di Delphi  menggunakan file header uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs,StdCtrls. Dan untuk vb6 tidak menggunakan file header tetapi menggunakan  private. private di sini biasanya terdapat setelah kita mengklik ganda tool yang di pasangkan di form.

2.       Dalam menggunakan variable.

paskal = kd_bln:integer

c++ = int kd_bln

Delphi = kd_bln : integer

Vb6 = Dim kd_bln As Integer

Pembuatan variable, di paskal itu yang di dahulukan adalah menggunakan nama variable dan di ikuti dengan titik dua dan yang terakhir adalah type variabelnya. Untuk di c++ yang di dahulukan itu adalah type variabelnya dan selanjutnya di ikuti dengan nama variabelnya. Delphi sama dengan paskal. Dan untuk vb6, yang di dahulukan adalah membuat dim terlebih dahulu di ikuti dengan nama variable selanjutnya as dan yang terakhir menggunakan type data.

Ø    PPemograman paskal 

            Kelebihan program paskal

1.       Bahasa di Pemograman paskal bisa di terapkan di pemograman delphi karena delphi perkembangan dari paskal.

2.       Type datanya masih standar contohnya boolean, string, char, integer, real

Kekurangan program paskal

1.       Dalam penulisan terlalu ribet karena harus ada begin dan end

2.       Penggunaan titik koma (;) yang membuat orang awam sering melupakannya, dan sering kali banyak kesalahan karena lupa akan titik koma (;)

3.       Tidak mendukung pemograman berorientasi objek

Ø            Pemograman C++ 

              Kelebihan program c++

1.       Induk dari bahasa pemograman java,php
2.      Pada penggunakan simbol logika mudah di hapal, karena di c++ untuk penggunakan operator  logika tersebut menggunakan simbol seperti

And= &&

Or=||

Not = !

Kekurangan

bagi pemula pemograman ini sangat sulit di pelajari apalagi dalam menggunakan pointer

Ø              Pemograman delphi

Kelebihan delphi

Bagi yang sudah belajar bahasa pemograman paskal pasti mudah mempelajari pemograman delphi, karena dari bahasa yang di gunakan delphi hampir sama dengan paskal, yang membedakannya mungkin kalau delphi sudah memiliki grafiknya, sedangkan paskal hanya berupa text.

Kekurangan

1. 1.       Kalau membuat aplikasi hitungan tidak akan mungkin hanya memasukan editbox saja, karena editbox type variabelnya string, jadi untuk mengubah type variable editbox tersebut harus di ubah ke numerik.seperti code program di bawah ini:  kd_bln:= strtoint(edit1.Text);
2.  Masih menggunakan titik koma (;) .

Ø              Pemograman vb6

kelebihan vb6

Kelebihan dari vb6 ini yaitu tidak menggunakan titik koma (;)

Kelemahan

Kelemahannya sama dengan delphi, tapi kode programnya yang berbeda. Untuk vb6 mengubah type datanya yaitu menggunakan kd_bln = Val(Text1). Kd_bln adalah nama variable yang bertype integer. Dan text1 adalah nama dari tool textbox.