LOOPING DI PASCAL
Apa itu looping?
Secara sederhana looping diartikan sebagai proses berulang terhadap statement maupun serngkai statement lebih dari satu kali.
Pernyataan FOR
Pernyataan FOR bisa digunakan untuk melakukan pengulangan yang jumlahnya tidak diketahui sebelumnya.Sebagai contoh, FOR dapat digunakan untuk menampilkan tulisan “Turbo Pascal” 10 kali ataupun dalam jumlah yang lebih banyak lagi.
Bentuk umumnya
For TO DO
Pernyataan:Dengn variabel,nilai_awal,dan nilai_akhir harus bertipe sama atau kompatible.Tipe yang digunakan pada ketiga komponen tersebut harus bertipe ordinal.
Pernyataan: Pernyataan yang akan dikerjakan.
Pernyataan WHILE
Pernyataan ini biasa dipakai untuk melakukan pengulangan yang jumlahnya tidak diketahui di depan atau selang pencacahan tidak sebesar 1 atau -1.Bentuk pernyataan.
While:
While kondisi do
Pernyataan kondisi
Kondisi:syarat supaya proses berulang bisa berlangsung
Pernyataan yang akan dikerjakan.
Pernyataan REPEAT
Repeat bisa dipakai untuk menangani pengulangan yang jumlahnya belum pasti,tetapi paling tidak dikerjakan sekali(pada while,ada kemungkinan bagian pernyataan tidak dijalankan sama sekali).Bentuk pernyataan repeat: Repeat:Pernyataan Until kondisi Dengan Pernyataan:pernyataan yang akan di kerjakan Kondisi:syarat supaya proses berhenti.
Program Menampilkan Bintang menggunakn FOR TO DO
Uses crt;
Var i,j,n:integer;
Begin
Clrscr ;
Writeln(‘program menampilkan bintang bentuk segitiga’);
Writeln(‘dengan FOR TO DO’);
Writeln;
Write(‘berapa jumlah bintang:’);readln(n);
For i:=1 to n do
Begin
For j:=1 to I do
Write(‘*’);
Writeln;
End;
Readkey
End.
Sekarang membuat bintang bertumpuk berbentuk pyramid,adapun koding tersebut seperti di bawah ini:
Uses crt;
Var I,j,n,sp:integer;
Begin
Clrscr;
Writeln(‘ program menampilkan bintang bentuk segitiga’);
Writeln(‘dengan FR TO DO’);
Writeln;
Write(‘berapa jumlah bintang:’);readln(n);
For i:=1 to n do
Begin
If(I mod 2=1) then
Begin
For j:=1 to((n-i) div 2) do
Write(‘ ‘);
For j:=1 to i do
Write(‘*’);
Writeln;
End;
End; Readln;
End.
Looping in Pascal Programming
Looping IN PASCALWhat is looping?In simple looping interpreted as an iterative process to serngkai statement and statement more than once.
FOR StatementFOR
statement can be used to perform a number of repetitions is not known
sebelumnya.Sebagai example, FOR can be used to display the words "Turbo
Pascal" in the amount of 10 times or even more.The general form
For TO DOStatement:
with less variables, nilai_awal, and nilai_akhir have the same type or
kompatible.Tipe used in all three components must be of type ordinal.
Statement: Statement to be done.WHILE statement
This
statement is usually used to perform a number of repetitions is not
known before or hose enumeration is not equal to 1 or-1.Bentuk
statement.
While:While condition doStatement of conditions
Condition: the requirement that the iterative process can takeThe statement will be done.
REPEAT statementRepeat
can be used to handle the amount of repetition is uncertain, but at
least it worked once (on a while, chances statement piece is not
executed at all). Shape repeat statement: Repeat: Until condition
statement the statement: a statement that will be in working condition:
condition so the process stops.
Program Showing Stars to use your FOR TO DO
Uses crt;
Var i,j,n:integer;
Begin
Clrscr ;
Writeln(‘program menampilkan bintang bentuk segitiga’);
Writeln(‘dengan FOR TO DO’);
Writeln;
Write(‘berapa jumlah bintang:’);readln(n);
For i:=1 to n do
Begin
For j:=1 to I do
Write(‘*’);
Writeln;
End;
Readkey
End.
Sekarang
membuat bintang bertumpuk berbentuk pyramid,adapun koding tersebut
seperti di bawah ini:
Uses crt;
Var I,j,n,sp:integer;
Begin
Clrscr;
Writeln(‘ program menampilkan bintang bentuk segitiga’);
Writeln(‘dengan FR TO DO’);
Writeln;
Write(‘berapa jumlah bintang:’);readln(n);
For i:=1 to n do
Begin
If(I mod 2=1) then
Begin
For j:=1 to((n-i) div 2) do
Write(‘ ‘);
For j:=1 to i do
Write(‘*’);
Writeln;
End;
End;
Readln;
End.
0 Response to "Looping pada Pemrograman Pascal"
Post a Comment