Презентация на тему по информатике Циклы в Паскаль

repeat - until с постусловием
циклы с предусловием

с предусловием выполняет действия заранее неизвестное число раз. Выход

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

begin

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

чисел до 50.
var
sum: integer;
n: integer;
begin

sum:=0;
n:=2;
while n <= 50 do
begin
sum:= sum + n;
n:= n + 2;
end;
writeln ('Сумма равна: ',sum);
end.

аналогичен оператору цикла с предусловием, но отличается от него

тем, что проверка условия производится после выполнения тела (действий) цикла. Это обеспечивает его выполнение хотя бы один раз в отличие от ранее разобранных циклов.
Обратите внимание на то, что данный оператор цикла предполагает наличие нескольких операторов в теле цикла, то есть можно выполнять несколько действий, поэтому служебные слова Begin и End не нужны.

последней цифр в числе.
var
a,b,c,d:integer;

begin
writeln('введите число');
readln(a);
d:=a mod 10;
repeat
b:=a mod 10;
a:=a div 10;
until a=0;
c:=d+b;
writeln(‘Сумма первой и последней цифры равна:‘c);
end.

Пример

задаёт условие по которому программа будет работать до его

выполнения, допустим нужно n раз зациклить программу, то это легко сделать с помощью данного цикла.
У цикла FOR есть характерная черта - счетчик который обычно обозначается буквой i или j.
В цикле счетчик можно задавать как в прямом (служебное слово to), так и в обратном порядке (служебное слово downto).

DO
begin

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

FOR i:= n2 DOWNTO n1 DO
begin
<тело цикла>;
end;

1 – ая форма записи

2 – ая форма записи

n2

Тело цикла

числа.
var
a, n, i, pr: integer;
begin
writeln

(‘Введите число');
readln (a);
writeln (‘Введите степень числа');
readln (n);
pr:= 1;
for i:= 1 to n do
begin
pr:= pr * a;
end;
writeln (‘Степень числа равна’,pr);
end.

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