Оператор повторения Цикл for…to…doЦикл for…downto…do Дибиров Магомедшапи Дибиргаджиевич
Цикл for…to…do Имеется три вида операторов цикла, а наиболее простым из них представляется оператор повторения for…to…doОператор повторения (или оператор цикла с параметром):For j:= expression1 to expression2 do statement;где j – управляющая переменная (счетчик) цикла for, является переменной целого, символьного, булева типов;expression1 и expression2 – выражения соответствующего j типа, причем expression1 < expression2.Тело цикла statement повторяется пока счетчик пробегает все значения от expression1 до expression2 и цикл прерывается или не начинается вовсе, если expression1 превысит значение выражения expression2.
Цикл for…downto…do Оператор повторения (или оператор цикла с параметром):For j:= expression1 downto expression2 do statement;где j – управляющая переменная (счетчик) цикла for, является переменной целого, символьного, булева типов;expression1 и expression2 – выражения соответствующего j типа, причем expression1 > expression2.Тело цикла statement повторяется пока счетчик пробегает все значения от expression1 до expression2 и цикл прерывается или не начинается вовсе, если expression1 станет меньше значения выражения expression2.
Оператор повторения J := expression1, expression2 Statement
Задание – решение Составить программу нахождения суммы 10 вводимых с клавиатуры чисел.Program Summ;Uses CRT;Const n = 10;Var I, x, S : integer;Begin clrscr;S := 0;for i:=1 to n do begin read (x);S := S + xend;write (‘S = ’, S)End.
Задание – решение Вывести на экран все делители данного натурального числа.Program Deliteli;Uses CRT;Var N, I : integer;Begin clrscr;write (‘Введите N ’); Read(n);for i:=1 to n do if frac(n/i)=0 then write(i:5);readkeyEnd.
Домашнее задание Повторить оператор условия и оператор повторенияСоставить программу для нахождения суммы чисел от 1 до 256, кратных числу 3.Будет сюрприиииизззз…