Belajar Pascal Yok :)...

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. (Wikipedia)

 

Berikut ini akan kita pelajari cara membuat program pascal J .

1.      Deret

Program Deret;

Uses wincrt;

Var

            I,N:Integer;

Begin

            Readln (N);

            Clrscr;

            For I:=1 To N Do

            Writeln (2*I-1);

End.

 

2.      Faktorial

Program Faktorial;

Uses wincrt;

Function faktorial (a:integer):longinteger;

Begin if (A=1) Then

Faktorial :=1 Else

Faktorial := A*Faktorial (A-1);

End;

Var

            X : Integer;

Begin

            Clrscr;

            Write (‘Nilai :’);

            Readln (X);

            Writeln (X,’!’,’=’, Faktorial (x));

            Readln;

End.

Tunggu program-program selanjutnya ...