Note tambahan While_do

2. Statement While

        { Apabila hanya terdapat satu statement}

  while (kondisi) do

  statement;

{Apabila terdapat lebih dari satu statement}

  while (kondisi) do begin

Statement1;

Statement2;

….

End;

Ada 2 jenis precedure dalam while_do :

prosedur Inc (Increment) artinya menaikkan nilai. Berikut contoh penggunaan prosedur Inc:

Inc(i);  {sama dengan i:=  i + 1}

Inc(I, 2);  {sama dengan i:=  i + 2}

Inc(I, 10);  {sama dengan i:=  i + 10}

Selain procedur Inc,  Bahasa pascal jg menyediakan prosedur Dec (Decrement) artinya menurunkan nilai. Berikut penggunaannya:

Dec(I);  {sama dengan i:=  i - 1}

Dec(I, 2);  {sama dengan i:=  i - 2}

Dec(I, 10); {sama dengan i:=  i - 10}