boolesn_exp do<br>    begin<br>        St;<br>        St;<br>    end;<br>*<br>دستور while (ادامه)<br>شرط تکرار حلقه<br>قبل از ورود به حلقه شرط تکرار بررسی می شود و در صورت صحیح بودن وارد حلقه می شود. <br>تا زمانی که شرط حلقه برقرار است، حلقه اجرا می شود<br>تغییر شرط<br>لازم است در بدنه شرط ، شرط حلقه تغییر کند تا حلقه بینهایت نشود.<br>While B do<br>