Циклический алгоритм 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

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