«аочное дистанционное образование с получением государственного диплома через Internet










ѕолучить информацию о поступлении
 
√лавна€ Ќовости  арта сайта ‘отоальбом √остева€ книга  онтакты

 

ќператор WHILE

ќператор while (пока) часто называют оператором цикла с предусловием за то, что проверка услови€ выполнени€ тела цикла производитс€ в самом начале оператора.

‘ормат записи:

while <условие продолжени€ повторений> do

<тело цикла>;

”словие Ц булевское выражение, тело цикла Ц простой или составной оператор.
 
ѕеред каждым выполнением тела цикла вычисл€етс€ значение выражени€ услови€. ≈сли результат равен True, то тело цикла выполн€етс€, и снова вычисл€етс€ выражение услови€. ≈сли результат равен False, происход€т выход из цикла и переход к первому после while оператору.
 
ѕримером работы while может служить программа DemoWhile, котора€ производит суммирование дес€ти произвольно введенных целых чисел.
 
program DemoWhile;
const Limit = 10; {ќграничение на количество вводимых чисел}
var
Count. Item. Sum: integer:
begin
Count:= 0; {—четчик чисел}
Sum:= 0; {—умма чисел}
 
while (Count < Limit) do {”словие выполнени€ цикла}
begin

Count:= Count+1;

Write('¬ведите ', Count, '-e целое число: ');

Readln(Item); {¬вод очередного числа с клавиатуры}

Sum:= Sum+Item;

end;
Writeln('—умма введенных чисел равна ', Sum);
end.

¬ данном примере в разделе описани€ констант описана константа Limit = 10, задающа€ ограничение на количество вводимых чисел. ¬ разделе описани€ переменных описаны переменные Count, Item, Sum целочисленного типа. ¬ начале выполнени€ программы обнул€ютс€ значени€ счетчика введенных чисел Count и их суммы.

«атем выполн€ютс€ цикл ввода 10 чисел и их суммирование. ¬начале оператора услови€ while провер€ет условие Count < Limit. ≈сли выражение истинно, то выполн€етс€ составной оператор в теле цикла:

begin
Count:= Count+1; Write('¬ведите ', Count, '-e целое число: ');
Readln(Item); Sum: = Sum+Item:
end

в котором вводитс€ значение очередного числа, и на это значение увеличиваетс€ значение суммы. ѕосле этого управление в программе вновь передаетс€ оператору цикла while, оп€ть провер€етс€ условие Count < Limit. ≈сли выражение истинно, то выполн€етс€ составной оператор и т. д., пока значение переменной Count меньше 10.

 ак только значение Count станет равно 10 и условие Count < Limit не будет соблюдено, выполнение цикла завершитс€, а управление будет передано на оператор, наход€щийс€ за словом end, т. е. первый оператор за границей while. Ёто вызов процедуры Writeln, котора€ выведет сообщение Ђ—умма введенных чисел равнаї и напечатает значение переменной Sum.


”знать как сэкономить в кризис моно на сайте ekonom-it.ru

–аздел операторов ”словный оператор ќператор выбора ќператоры повтора (циклы) ÷икл FOR ќператор REPEAT “естирование и отладка программ ¬строенные функции и процедуры —труктурированные типы данных ќбласть видимости идентификаторов 


 
     
   
 


ѕриглашаем прин€ть участие в круглом столе!
подробнее   >>>
 

»нститут ћенеджмента, Ёкономики и »нноваций начинает набор на курсы повышени€ квалификации!
подробнее   >>>
 

”важемые студенты јЌќ ¬ѕќ »ћЁи»!
подробнее   >>>
 

Ќачинаетс€ набор на курсы повышени€ квалификации!
подробнее   >>>
 

ѕриглашаем прин€ть участие в конференци€х!
подробнее   >>>
 


все новости...

 


–ассылки Subscribe.Ru
—овременное образование
ѕодписатьс€ письмом