Организация программ циклической структуры 9 класс

первоначальное значение In, затем значение i сравнивается с конечным значением

Ik и если In <= Ik, то осуществляется переход к телу цикла. После выполнения тела цикла значение i увеличивается автоматически на 1 и опять повторяется сравнение с In. Так продолжается до тех пор пока значение i не станет больше значения In.
Если тело цикла содержит 2 и больше операторов, то оно заключается в операторные скобки begin … end.

;


Вторая форма записи (назад):
For i:= In downto Ik

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

тело цикла

i:=In;Ik

;
end;

Вторая форма записи (назад):
For i:= In downto Ik do
begin

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

20. Вывести на экран данную последовательность и сумму.
(Решить тремя

способами!)

S:=0;
for i:=10 to 20 do
begin

S:=S+i;
write(i:4);
end;
writeln;
writeln('S=',S);
readln;
End.

начинается с проверки условия, записанного после слова while. Если оно

соблюдается (true), то выполняется <тело цикла>, затем вновь проверяется условие и т.д. Как только при очередной проверке окажется, что условие не соблюдается (false), <тело цикла> выполняться не будет.
В теле цикла обязательно должен быть оператор, влияющий на соблюдение условия, и противном случае произойдет зацикливание.
Если тело цикла содержит 2 и больше операторов, то оно заключается в операторные скобки begin … end.

цикла>;
end;

20. Вывести на экран данную последовательность и сумму.
(Решить тремя

способами!)

i:=10;
while i

write(i:4);
i:=i+1;
end;
writeln;
writeln('S=',S);
readln;
End.

цикла, выполняется один раз, после чего проверяется соблюдение условия, записанного

следом за служебным словом until. Если условие соблюдается (true), цикл завершается. В противном случае – тело цикла выполняется еще раз, после чего снова проверяется соблюдение условия.
Т.к. тело цикла находится между служебными словами repeat … until, то операторные скобки не требуются.

20. Вывести на экран данную последовательность и сумму.
(Решить тремя

способами!)

S:=0;
i:=10;
repeat
S:=S+i;

write(i:4);
i:=i+1;
until i>20;
writeln;
writeln('S=',S);
readln;
End.

цикл.
y:=2; x:=20;
while x>10 do
begin
x:=x–3;

y:=y-x;
end;

цикл.
y:=1;
for x:=1 to 5 do
y:=y+x;

цикл.
y:=1; x:=10;
repeat
y:=y*x;
x:=x–2;
until x

чисел чётных и нечётных чисел в интервале от 10 до

20. На экран вывести последовательности чисел и их суммы. Задание решить с использованием любого цикла.

2. Составить программу для нахождения суммы квадратов цифр целого числа

Задача 3. Составить программу планирования закупки товара в магазине на сумму, не превышающую заданную величину

Какие виды циклов существуют в Паскале?
3.      Как работает цикл

с параметром?
4.      Как выполняется цикл с предусловием?
5.      Как работает цикл с постусловием?
6.      Чем отличаются циклы с условием?

.. 45 кратных 5. На экран вывести последовательности чисел и

их сумму. Задание решить с использованием каждого цикла. Сколько раз выполняется каждый цикл.