Разговоры о важном

Описание презентации по отдельным слайдам:

• 

  1 слайд

  Выполнила: учитель Минина О.В.
  Муниципальное бюджетное общеобразовательное учреждение
  города Керчи Республики Крым «Школа №26 имени Героя Советского Союза Д.Т. Доева»
  Одномерные массивы

• 

  2 слайд

  Массив – это структура данных, представляющая собой совокупность элементов одного типа.
  Элемент массива – отдельная переменная, входящая в массив. Размерность массива – количество элементов, которое содержит массив

• 

  3 слайд

  Индекс элемента массива – номер элемента в массиве. Массив должен быть объявлен в разделе объявления переменных.
  Доступ к элементу массива осуществляется путем указания индекса элемента, в качестве которого можно использовать выражение целого типа. Для ввода/вывода и обработки массивов применяют инструкции циклов.

  <Имя массива>:ARRAY [< индекс >] OF < тип>;

• 

  4 слайд

  M1:array[1..5] of real – описание одномерного массива вещественных чисел, содержащий 5 элементов;

• 

  5 слайд

  Заполнить элементы одномерного массива значениями мы можем:
  Вводя значения с клавиатуры
  Случайным образом
  По формуле

• 

  6 слайд

  Заполнение с клавиатуры.
  FOR i:=1 to 10 do
  Begin
  writeln (‘Введите значения элемента’);
  readln (a[i]);
  end;
   
  2.Заполнение случайным образом. Для этого мы должны подключить датчик случайных чисел.
  FOR i:=1 to 10 do
  A[i]:=random(n);
  {n должно быть заранее задано}
  3. Заполнение по формуле.
  FOR i:=1 to 10 do
  F[i]:=sin (i)-cos (i);

• 

  7 слайд

  Базовые алгоритмы вычисления. Одномерные массивы.
   
  Печать элементов одной строки.
  FOR i:=1 to n do
  Writeln(a[i], ‘’);

   
  2.Сумма элементов.
  S:=0;
  FOR i:=1 to n do
  S:=S+a[i];
  3. Поиск максимального (минимального) элемента.
  max:=a[i];
  FOR i:=2 to n do
  If a[i]>max then max:=a[i];

• 

  8 слайд

  Найти сумму положительных
  элементов массива.
  Рассмотрим пример:

• 

  9 слайд

  const N = 15;
  var arr: array[1..N] of integer;
  i: byte; sum: integer;
  begin
  randomize;
  for i:=1 to N do begin
  arr[i] := random(10) — 5;
  write(arr[i]:4); end; writeln; sum := 0;
  for i:=1 to N do
  if arr[i] > 0 then sum := sum + arr[i]; writeln(sum:5);
  end.

• 

  10 слайд

  СПАСИБО ЗА ВНИМАНИЕ

Автор статьи

Анастасия

Задать вопрос

Эксперт