program Deret

PROGRAM DERET;
USES WINCRT;
VAR I, N:INTEGER;
BEGIN
READLN(N);
FOR I:=1 TO N DO
       WRITELN(2*I-1);
 END.

Contoh Program median, rata-rata dan Standar Deviasi pada program pascal

program mean_median_stdev;
uses wincrt;
var s,k,xi,x:integer;
    total,rata,median,stdev:real;
begin
write('masukkan jumlah datae cak:');readln(k);
for s:=1 to k do
begin
write('data ke-',s,':');readln(xi);
x:=x+xi;
total:=total+xi;
stdev:=sqrt((total-k*sqrt(rata))/(k-1));
end;
rata:=x/k;
if k mod 2=1 then
median:=(k+1)/2
else
median:=((k+1)+k)/2;
writeln('xxxxxxxxxxxxxxxxxxxxxxxxx');
writeln('total:',total:2:0);
writeln('mean:',rata:2:0);
writeln('median data ke-:',median:2:0);
writeln('stdev:',stdev:2:0);
writeln('xxxxxxxxxxxxxxxxxxxxxxxxx');
end.

Konsep Dasar Bahasa Pascal

Struktur Dan Komponen Dasar Program Pascal.

Struktur dari suatu program Pascal terdiri dari sebuah judul program dan suatu

blok program atau badan program. Blok program dibagi lagi menjadi dua bagian, yaitu bagian deklarasi dan bagian pernyataan (statement).

Struktur program :

Judul Program PROGRAM nama-program;

Blok Program

Bagian deklarasi

- deklarasi label LABEL nama-label;

- deklarasi konstanta CONST…………..;

- deklarasi tipe TYPE …………….;

- deklarasi variabel VAR ………………;

- deklarasi prosedur PROCEDURE nama-prosedur;

……………………………….;

- deklarasi fungsi FUNCTION nama-fungsi;

………………………….;

Bagian Pernyataan

Begin

(statement)

…………;

…………;

end.

Contoh : Menghitung luas bidang berbentuk empat persegi panjang dengan panjang P

dan lebar L.

PROGRAM Luas; {Judul}

VAR P,L,Luas : real; {Deklarasi variabel}

BEGIN

Read (P,L); {Statemant}

Luas := P*L; {Statement}

Write (P,L,Luas); {Statement}

END.

Judul program sifatnya adalah optional, dan bila ditulis, harus terletak pada awal dari program dan diakhiri dengan titik koma. Bagian deklarasi digunakan bila di dalam program digunakan pengenal ( identifier). Identifier dapat berupa label, konstanta, tipe, variabel, prosedur dan fungsi. Kalau suatu program menggunakan identifier, Pascal menuntut supaya identifier tersebut diperkenalkan terlebih dahulu sebelum digunakan, yaitu dideklarasikan terlebih dahulu pada bagian ini.

Beberapa aturan dalam program Pascal :

• Akhir sebuah program Pascal ditandai dengan tanda baca titik (.) setelah END yang paling akhir.

• Tanda titik koma (;) merupakan pemisah antar instruksi satu dengan lainnya.

• Beberapa statement boleh ditulis menjadi satu baris dipisahkan dengan tanda baca titk koma (;)

Contoh : simpan := akhir; akhir := simpan + awal;

• Baris komentar diletakkan diantara tanda (* dan *) atau diantara tanda { dan }

Contoh : Var rerata : real; (*nilai rata-rata*)

Nil1 : real; {nilai ujian}

Statement (pernyataan)

Adalah instruksi atau gabungan instruksi, yang menyebabkan komputer melakukan aksi.

Type statement dalam Pascal terdiri atas :

1. Sederhana :

- menandai sebuah item data ke sebuah variable (assigment statement) contoh : X := Y * 4.135

- pemanggilan procedure dan goto statement

2. Terstruktur:

- Compound Statement

contoh : Begin

read (x) ;

y : = x + 5 ;

write (y)

End.

- Repetitive Statement

contoh : For I := 1 to 100 do

write (count);

- Conditional Statement

contoh : If x > 100 then write (s)

else write (p) ;Struktur Dan Komponen Dasar Program Pascal.

Struktur dari suatu program Pascal terdiri dari sebuah judul program dan suatu

blok program atau badan program. Blok program dibagi lagi menjadi dua bagian, yaitu bagian deklarasi dan bagian pernyataan (statement).

Struktur program :

Judul Program PROGRAM nama-program;

Blok Program

Bagian deklarasi

- deklarasi label LABEL nama-label;

- deklarasi konstanta CONST…………..;

- deklarasi tipe TYPE …………….;

- deklarasi variabel VAR ………………;

- deklarasi prosedur PROCEDURE nama-prosedur;

……………………………….;

- deklarasi fungsi FUNCTION nama-fungsi;

………………………….;

Bagian Pernyataan

Begin

(statement)

…………;

…………;

end.

Contoh : Menghitung luas bidang berbentuk empat persegi panjang dengan panjang P

dan lebar L.

PROGRAM Luas; {Judul}

VAR P,L,Luas : real; {Deklarasi variabel}

BEGIN

Read (P,L); {Statemant}

Luas := P*L; {Statement}

Write (P,L,Luas); {Statement}

END.

Judul program sifatnya adalah optional, dan bila ditulis, harus terletak pada awal dari program dan diakhiri dengan titik koma. Bagian deklarasi digunakan bila di dalam program digunakan pengenal ( identifier). Identifier dapat berupa label, konstanta, tipe, variabel, prosedur dan fungsi. Kalau suatu program menggunakan identifier, Pascal menuntut supaya identifier tersebut diperkenalkan terlebih dahulu sebelum digunakan, yaitu dideklarasikan terlebih dahulu pada bagian ini.

Beberapa aturan dalam program Pascal :

• Akhir sebuah program Pascal ditandai dengan tanda baca titik (.) setelah END yang paling akhir.

• Tanda titik koma (;) merupakan pemisah antar instruksi satu dengan lainnya.

• Beberapa statement boleh ditulis menjadi satu baris dipisahkan dengan tanda baca titk koma (;)

Contoh : simpan := akhir; akhir := simpan + awal;

• Baris komentar diletakkan diantara tanda (* dan *) atau diantara tanda { dan }

Contoh : Var rerata : real; (*nilai rata-rata*)

Nil1 : real; {nilai ujian}

Statement (pernyataan)

Adalah instruksi atau gabungan instruksi, yang menyebabkan komputer melakukan aksi.

Type statement dalam Pascal terdiri atas :

1. Sederhana :

- menandai sebuah item data ke sebuah variable (assigment statement) contoh : X := Y * 4.135

- pemanggilan procedure dan goto statement

2. Terstruktur:

- Compound Statement

contoh : Begin

read (x) ;

y : = x + 5 ;

write (y)

End.

- Repetitive Statement

contoh : For I := 1 to 100 do

write (count);

- Conditional Statement

contoh : If x > 100 then write (s)

else write (p) ;