Презентация по информатике "Связь алгоритма и программы"

• 1 слайд

  Связь блок-схемы
  Романенко Т.Н.,
  учитель информатики МАОУ СОШ № 53 г. Томска
  и программы на языке Pascal
  

• 2 слайд

  ЛИНЕЙНЫЙ АЛГОРИТМ
  Задача 1.
  С клавиатуры вводятся
  два натуральных
  числа a и b.
  Вывести на экран
  их сумму, разность,
  произведение и частное
  

• 3 слайд

  ЛИНЕЙНЫЙ АЛГОРИТМ
  a, b
  sum, razn,
  pr, chast
  НАЧАЛО
  sum:=a + b
  razn:=a – b
  pr:=a * b
  chast:=a / b
  КОНЕЦ
  Begin
  Writeln(‘введите два числа а и b’);
  Readln(a,b);
  
  Var a,b :Integer; sum,razn,pr :Integer;
  chast :Real;
  sum:=a + b;
  razn:=a – b;
  pr:=a * b;
  chast:=a / b;
  
  Writeln(‘sum=’,sum:2);
  Writeln(‘razn=’,razn:2);
  Writeln(‘pr=’,pr:2);
  Writeln(‘chast=’,chast:2:2);
  
  
  
  Readln; End.
  

• 4 слайд

  АЛГОРИТМ ВЕТВЛЕНИЕ
  Задача 2.
  С клавиатуры вводятся
  коэффициенты A, B, C
  квадратного уравнения.
  Вычислить корни
  квадратного уравнения
  

• 5 слайд

  АЛГОРИТМ ВЕТВЛЕНИЕ
  A, B, C
  Корней
  нет
  НАЧАЛО
  D:=Sqr(B) – 4*A*C
  КОНЕЦ
  Begin
  Writeln(‘введите коэффициенты A,B,C’);
  Readln(A,B,C);
  
  Var A,B,C :Integer;
  D :Real; x,x1,x2 :Real;
  Readln; End.
  D<0
  D:=Sqr(B) – 4*A*C;
  IF D<0
  x:=-B/(2*A)
  да
  нет
  writeln(‘корней нет’)
  then
  D=0
  else
  IF D=0
  then
  да
  нет
  x
  x1:=-B+Sqrt(D)/(2*A)
  x2:=-B-Sqrt(D)/(2*A)
  x1,x2
  Begin
  x:=-B/(2*A);
  else
  begin
  end;
  x1:=-B+Sqrt(D)/(2*A);
  x2:=-B-Sqrt(D)/(2*A);
  writeln(‘x1=‘,x1:2:2);
  writeln(‘x2=‘,x2:2:2);
  
  writeln(‘x=‘,x:2:2);
  end
  
  

• 6 слайд

  АЛГОРИТМ ЦИКЛА СО СЧЕТЧИКОМ
  Задача 3.
  Вывести на экран
  сумму первых 50 членов
  натурального ряда
  

• 7 слайд

  АЛГОРИТМ ЦИКЛА СО СЧЕТЧИКОМ
  S
  НАЧАЛО
  S:=0
  КОНЕЦ
  Begin
  S:=0;
  Var N:Integer; S:Integer;
  Readln;
  End.
  For N:=1 to 50 do
  S:=S + N
  writeln(‘S=‘,s:2);
  N=1,50,1
  S:=S + N;
  

• 8 слайд

  АЛГОРИТМ ЦИКЛА С ПРЕДУСЛОВИЕМ
  Задача 4.
  С клавиатуры вводятся
  целые числа.
  Программа подсчитывает
  их сумму до тех пор,
  пока не будет введено
  отрицательное число
  

• 9 слайд

  АЛГОРИТМ ЦИКЛА С ПРЕДУСЛОВИЕМ
  sum
  НАЧАЛО
  sum:=0
  a:=1
  КОНЕЦ
  Begin
  sum:=0;
  a:=1;
  Var sum, a :Real;
  Readln;
  End.
  While a>=0 do
  sum:=sum + a
  writeln(‘Введите число’);
  Readln(a);
  sum:=sum + a;
  A<0
  a
  end;
  writeln(‘Сумма чисел=’, sum:2:2);
  да
  нет
  begin
  

• 10 слайд

  АЛГОРИТМ ЦИКЛА С ПОСТУСЛОВИЕМ
  Задача 5.
  С клавиатуры вводятся
  целые числа.
  Программа подсчитывает
  их сумму до тех пор,
  пока не будет введено
  отрицательное число
  

• 11 слайд

  АЛГОРИТМ ЦИКЛА С ПОСТУСЛОВИЕМ
  S
  НАЧАЛО
  S:=0
  A:=0
  КОНЕЦ
  Begin
  S:=0;
  A:=0;
  Var A:Integer; S:Integer;
  Readln;
  End.
  repeat
  S:=S + A
  writeln(‘Введите новое число’);
  Readln(a);
  S:=S + A;
  A<0
  A
  until a<0;
  writeln(‘Сумма чисел=’, s:2 );
  нет
  да
  

Краткое описание документа:

Презентация по информатике на тему "Связь алгоритма в виде блок-схемы и программы на языке программирования Pascal" составлена для уроков изучения тем "Алгоритмизация" и "Программирование" в 9 классе.

В презентации рассмотрены три вида алгоритмов: линейный, ветвление и три вида циклов.

Презентация показывает связь участков блок-схемы и описание данных команд в программе на языке программирования в доступной форме.

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