Циклический алгоритм (9 класс)

видами циклических алгоритмов.

Применить изученный материал на практике при решении задач.

идти по одному из нескольких заранее предусмотренных путей.

При однократном выполнении

разветвляющегося алгоритма существуют действия,…
которые не выполняются.

[Else ];

Другие операторы: …
Readln(a, b);

Writeln(‘ x = ’,x);
a:=a+b;

Повторение

оператор ввода

оператор вывода

оператор присваивания

формуле

А+В, если А- чётное и

А*В, если А- нёчетное.

Повторение

IF A mod 2 = 0 Then C:=A+B
Else C:=A*B;

ELSE

Writeln(‘ЖАЛЬ!’);
сделайте замену
1. IF d=10 THEN Writeln(‘УРА!’)
ELSE Writeln(‘ЖАЛЬ!’);
2. IF not (d=10) THEN Writeln(‘УРА!’)
ELSE Writeln(‘ЖАЛЬ!’);
3. IF not (d=10) THEN Writeln(‘ЖАЛЬ!’)
ELSE Writeln(‘УРА!’);
4. IF not (d<>10) THEN Writeln(‘ЖАЛЬ!’)
ELSE Writeln(‘УРА!’);

Повторение

условного оператора

IF j>k THEN j:=k-2 ELSE k:=k-2;

если исходные

значения переменных равны

j=3, k=5;
j=3, k=3;
j=3, k=2;

Повторение

j=3, k=3

j=3, k=1

j=1, k=2

действий

A:= 15 div (16 mod 7)
B:=34 mod A * 5

– 29 mod 5 *2

Повторение

А = 7, В = 22

повторяться неоднократно, называется циклическим.

неоднократно, называется телом цикла.

J:= Kz dowto Nz do
;
Блок операторов выполняется

|Kz-Nz+1| раз

FOR J:=10 TO 99 DO
S:=S+J;
Writeln(‘Сумма всех

двузначных чисел:’, S);

End.

нач

кон

S:=0

J:=10 to 99 do

S

IF J MOD 2 = 0 THEN S:=S+J

четных

выполняется пока условие принимает значение истина

WHILE J100 DO
Begin
S:=S+J; J:=J+1;
End;
Writeln(’Сумма всех

двузначных чисел:’, S);
End.

да

J<>100

кон

до тех пор, пока условие принимает значение ложь

с постусловием

REPEAT

Program zadacha3;
Var j,s:integer;
Begin
S:=0; J:=10;
REPEAT
S:=S+J; J:=J+1
UNTIL J=100 ;
Writeln(‘Сумма всех
двузначных чисел:’, S);
End.

чисел вывести те, сумма цифр которых равна N
(N

– вводится с клавиатуры).