Contoh Program Pascal Dengan Struktur Biasa

Program Struktur_Biasa;
Uses CRT;
Var a,b,c : integer;
Begin
  ClrScr;
        Write(‘masukkan nilai a dan b : ‘);
        Readln(a,b);
        c:=a+b;
        Writeln('nilai c : ',c);
  Readln;
End.

Screenshoot Script