И
К
И К К И
F = N! = 1 × 2 × … × N
WHILE условие DO
оператор (тело цикла) ;
Цикл выполняется до тех пор, пока истинно условие
Если несколько операторов в теле цикла, то использовать BEGIN …. END
Криворотова Л.Н.
МОУ "Гимназия №5", г.Тырныауз
Практическая работа
Евклид
(365-300 до. н. э.)
НОД(12, 18) = 6
Дано: M, N
Найти: НОД(N,M)
Постановка задачи
НОД (18, 45) = НОД (18, 45-18) = НОД (18, 27)= =НОД (18, 9) =НОД(9,9)=9
Пример :
Практическая работа
Криворотова Л.Н.
МОУ "Гимназия №5", г.Тырныауз
Криворотова Л.Н.
МОУ "Гимназия №5", г.Тырныауз
Криворотова Л.Н.
МОУ "Гимназия №5", г.Тырныауз
Криворотова Л.Н.
МОУ "Гимназия №5", г.Тырныауз
Криворотова Л.Н.
МОУ "Гимназия №5", г.Тырныауз
Цикл с постусловием
Program Summa2;
Var S, N, a: integer;
Begin
Writeln(‘Введите N’);
Readln(N);
a:=1; S:=0;
Repeat
S:=S+a;
a:=a+1;
Until a>N
Write(‘сумма =’, S);
Readln
End.
Цикл с параметром
Program Summa3;
Var S, N, a: integer;
Begin
Writeln(‘Введите N’);
Readln(N);
S:=0;
For a:= 1 to N do
S:=S+a;
Write(‘сумма =’, S);
Readln
End.
Криворотова Л.Н.
МОУ "Гимназия №5", г.Тырныауз
Криворотова Л.Н.
МОУ "Гимназия №5", г.Тырныауз
§12.7, №8
§4.4.3
том1
Криворотова Л.Н.
МОУ "Гимназия №5", г.Тырныауз
Это сайт презентаций, где можно хранить и обмениваться своими презентациями, докладами, проектами, шаблонами в формате PowerPoint с другими пользователями. Мы помогаем школьникам, студентам, учителям, преподавателям хранить и обмениваться учебными материалами.
Email: Нажмите что бы посмотреть