Презентация по информатике и ИКТ на тему "Паскаль. Циклы с условием" (9 класс)

• 1 слайд

  Циклы с неизвестным числом шагов
  
  Циклы с условием
  

• 2 слайд

  Цикл с предусловием
  
  Цикл «пока»
  Оператор «While»
  

• 3 слайд

  Оператор while называют оператором цикла с предусловием, за то, что проверка условия выполняется в самом начале, перед блоком операторов цикла.
  

• 4 слайд

  Формат записи
  While <условие> do
  begin
  операторы;
  end;
  

• 5 слайд

  Цикл с постусловием
  
  Цикл «до»
  Оператор «Repeat»
  

• 6 слайд

  Оператор repeat называют оператором цикла с постусловием, за то, что проверка условия выполняется в самом конце, после блока операторов цикла.
  

• 7 слайд

  Формат записи
  Repeat
  операторы;
  Until <условие>;
  

• 8 слайд

  Особенности:
  В цикле с предусловием тело цикла может не выполниться ни разу (проверка условия в начале цикла)
  В цикле с постусловием операторы цикла выполнятся хотя бы один раз (проверка условия после тела цикла)
  У оператора Repeat операторные скобки не ставятся
  У оператора While указывается условие выполнения цикла, а у оператора Repeat – условие окончание цикла
  

• 9 слайд

  Задача.
  Найти сумму 10 любых введенных чисел, используя операторы
  While и Repeat
  

• 10 слайд

  Оператор While
  начало
  S:=0;
  i:=1;
  i<=10
  x
  S:=S+x;
  i:=i+1;
  S
  конец
  Пока i<=10 делай
  

• 11 слайд

  program Z1;
  var s,i,x:integer;
  begin
  s:=0;
  i:=1;
  while (i<=10) do
  begin
  writeln ('введите число');
  read (x);
  s:=s+x;
  i:=i+1;
  end;
  writeln ('сумма равна',s);
  end.
  

• 12 слайд

  Оператор Repeat
  Делай ДО выполнения условия i>10
  начало
  i>10
  x
  S
  конец
  S:=0;
  i:=1;
  S:=S+x;
  i:=i+1;
  

• 13 слайд

  program Z2;
  var s,i,x:integer;
  begin
  s:=0;
  i:=1;
  repeat
  writeln ('введите число');
  read (x);
  s:=s+x;
  i:=i+1;
  until (i>10);
  writeln ('сумма равна',s);
  end.
  

• 14 слайд

  Решение задач
  

• 15 слайд

  Задача №1
  Вычислить произведение А=2*4*6*8*10, используя операторы
  While и Repeat
  

• 16 слайд

  program Z3;
  var a,i:integer;
  begin
  a:=1;
  i:=2;
  while (i<=10) do
  begin
  a:=a*i;
  i:=i+2;
  end;
  writeln ('результат',a);
  end.
  program Z4;
  var a,i:integer;
  begin
  a:=1;
  i:=2;
  
  repeat
  a:=a*i;
  i:=i+2;
  until (i>10);
  
  writeln ('результат',a);
  end.
  

• 17 слайд

  Задача №2
  Вычислить сумму А=5+10+15+…+N, используя операторы
  While и Repeat
  

• 18 слайд

  program Z5;
  var a,i,n:integer;
  begin
  writeln ('введите n');
  read (n);
  a:=0;
  i:=0;
  while (i<=n) do
  begin
  a:=a+i;
  i:=i+5;
  end;
  writeln ('результат',a);
  end.
  program Z6;
  var a,i,n:integer;
  begin
  writeln ('введите n');
  read (n);
  a:=0;
  i:=0;
  repeat
  a:=a+i;
  i:=i+5;
  until (i>n);
  writeln ('результат',a);
  end.
  

• 19 слайд

  Задачи для самостоятельного решения
  

• 20 слайд

  Задача для самостоятельного решения №1.
  Вычислить сумму S=2x+3x+4x+…+Nx, используя операторы
  While и Repeat
  

• 21 слайд

  Задача для самостоятельного решения №2
  Напечатать «столбиком» квадраты всех двухзначных чисел, используя операторы
  While и Repeat
  (Двухзначные числа от 10 до 99)
  

• 22 слайд

  Задача для самостоятельного решения №3.
  Вычислить значение функции y=2*sqr(x)+5, для значений Х, изменяющихся от -3 до 1 с шагом 0,1. выводить результат и значение Х на каждом шаге, используя операторы
  While и Repeat
  

• 23 слайд