While-Do Döngüsü
Whiledan sonraki koşul doğru olduğu sürece işlem(ler) tekrarlanır. Whiledaki koşul(lar) doğru olduğu anda döngüden çıkar.
While koşul(lar) do
Begin
...
işlemler;
...
End;
Örnek :
Var
I : Integer;
begin
I := 100;
while((I >= 0) and (I <= 9)) do
begin
Write('Bir sayı giriniz : ');
ReadLn(I);
end;
writeln(‘Sayı 0..9 arasındadir.’);
End.
Repeat-Until Döngüsünden farklı olarak öncelikle koşual bakılır sonra döngü başlar.
1-Döngüden çıkabilmek için mutlaka koşulun döngü içinde değişmesi gerektiğine dikkat edin.
2-Birden fazla koşul kullanacaksanız bu koşulların tümünü bir parantez içine alın
Whiledan sonraki koşul doğru olduğu sürece işlem(ler) tekrarlanır. Whiledaki koşul(lar) doğru olduğu anda döngüden çıkar.
While koşul(lar) do
Begin
...
işlemler;
...
End;
Örnek :
Var
I : Integer;
begin
I := 100;
while((I >= 0) and (I <= 9)) do
begin
Write('Bir sayı giriniz : ');
ReadLn(I);
end;
writeln(‘Sayı 0..9 arasındadir.’);
End.
Repeat-Until Döngüsünden farklı olarak öncelikle koşual bakılır sonra döngü başlar.
1-Döngüden çıkabilmek için mutlaka koşulun döngü içinde değişmesi gerektiğine dikkat edin.
2-Birden fazla koşul kullanacaksanız bu koşulların tümünü bir parantez içine alın
