Turbo Pascal 2

Minggu kedua (21 Maret 2012)

   1.Sebutkan dan jelaskan statement perulangan pada pascal ?

     2.Tuliskan bentuk umum dari perulangan pada pascal ?

   3.Tuliskan contoh program dari perulangan dari soal no 2 ?

Jawaban :

1.  For...Do : Mengulang pernyataan berulang kali dengan jumlah yang telah ditentukan

While...Do : Melakukan proses pengulangan suatu pernyataan secara terus menerus selama kondisi logika pada While masih bernilai logika positif

Repeat...Until : Mengulang pernyataan sampai kondisi yang diseleksi di Until tidak terpenuhi

2.  For...Do
Begin

For variabel control:=nilai awal To nilai akhir Do statemen End

While...Do

Begin

While ungkapan logika Do statement

End.

Repeat...Until

Begin

Repeat statement Until ungkapan

End.

3.  For...Do                While...Do        Repeat...Until   

   Uses crt;               Uses crt;         Uses crt;

Var I:integer;          Var I:nteger;     Var I:Integer;

Begin                   Begin             Begin

For I:1 to 10 do        I:=0;             I:=0;

Begin                   While I<5 Do      Repeat

Write(1);               Begin             I:=I+1

Writeln(‘Pascal’);    Writeln(I);       Writeln(I);

End;                    I:=I+1;           Until I=5

End.                    End;              End.

                        End.