Syallooomm1. For
biasa digunakan untuk perulangan positif atau perulangan dengan penghitung (couter) dari kecil kebesar atau dengan kata lain pertambahannya positif.Bu : For variabel-kontrol := nilai awal To nilai-akhir Do statemen
var i : integer;
begin
i:=0;
repeat
i:=i+1;
writeln(i);
until i = 5;
readln;
end.
ATAU:
2.Repeat Until,
digunakan untuk mengulang statemen suatu blok statemen sampai (until) kondisi yang diseleksi di Until tidak terpenuhi.
bu : repeat
statemen;
until ungkapan_logika;
var
i:integer;
begin
for i:= 1 to 5 do
begin
for j:= 1 to 5 do
write(i:5,j:5);
writeln;
end;
readln;
end.
maka akan menghasilkan :
1 1 1 5
51555
Anda mungkin juga meminati:
LinkWithin
