Презентация на тему "Структурированные типы данных: Одномерные массивы" 9 класс

Содержание

• 
  Слайд 1

  Структурированные типы данных

  Одномерные массивы

• 
  Слайд 2

  Одномерные массивы

  - это упорядоченная совокупность значений одинакового типа Значения совокупности называются элементами массива Упорядочены элементы в массиве таким образом, что каждому элементу соответствует номер (индекс), определяющий его местоположение в общей последовательности Количество элементов в массиве определяют его размерность

• 
  Слайд 3

  Одномерный массив

  Имя массива – A Индексированные переменные a[1],a[2], …,a[10] Размерность (количество значений) - 10 a[1]:=1; a[2]:=2; a[3]:=3; a[4]:=4; a[5]:=5; a[6]:=6; a[7]:=7; a[8]:=8; a[9]:=9; a[10]:=10;

• 
  Слайд 4

  Одномерные массивы

  Числовое множество F={1,6,2,0,4,-2,1,0,6,0,2,8,9} Имя? Размерность? Значения? Индексированная переменная? Какие значение принимает индекс (номер)? Что означает эта запись F[i]? Что получится если i:=1, 2 или 4?

• 
  Слайд 5

  Одномерный массив

  Spisok[1]:=‘Иванов В’; Spisok[2]:=‘Петров К’; Spisok[3]:=‘Сидоров И’; Spisok[4]:=‘Галкин Ф’; Spisok[5]:=‘Палкин С’; Spisok[6]:=‘Веткин А’; ИМЯ? РАЗМЕРНОСТЬ? ЗНАЧЕНИЯ? ИНДЕКСИРОВАННЫЕ ПЕРЕМЕННЫЕ?

• 
  Слайд 6

  Описание одномерного массива

  var : array [] of ; 1) var a: array [1..10] of integer; 2) const n=100; var c: array [1..n] of real;

• 
  Слайд 7

  Описание одномерного массива:

  type = array [] of ; var : ; type mas=array [0..9] of integer; matr=array [0..9] of real; var m: mas; a: matr;

• 
  Слайд 8
  

  type massiv =array [] of integer; const temp :massiv = (30,28,31,30,31,30,31,31,30,31,30,31); массив констант type massiv = array [] of integer; const temp : massiv = (значение элемента1, значение элемента2, …, значение последнего элемента);

• 
  Слайд 9

  Формирование/заполнение массива

  Ввод значений элементов массива осуществляется: с клавиатуры for i:=1 to 10 dobegin write(‘Введите a[’,i,’]’); readln( a[i]); end; С помощью оператора присвоения (вычисление по формуле, генерирование случайных чисел)

• 
  Слайд 10

  Вывод массива на экран

  Вывод одномерного массива может выполнятся: в строку в столбец

• 
  Слайд 11

  Примеры решения задач

  Одномерные массивы

• 
  Слайд 12
  

  Заполнить одномерный массив С(7) целыми случайными числами в диапазоне (-10,10).Вывести на экран этот массив в виде строки.

  Program pr1; Var c: array [1..7] of integer; i: integer; begin randomize;{заполнение массива случайными числами} for i:=1 to 7 do c[i]:=random(20)-10; writeln(‘Одномерный массив случайных чисел C[7]’); for i:=1 to 7 do write(c[i]:3); end. Видэкранапослевыполненияпрограммы: Одномерный массив случайных чисел C[7] 3 0 8 3 -5 -1 9

• 
  Слайд 13
  

  Заполнение случайными числами и вывод исходного массива можно объединить в одном цикле:

  Program pr1; Var c: array [1..7] of integer; i: integer; begin randomize;{заполнение массива случайными числами} writeln(‘Одномерный массив случайных чисел C[7]’); for i:=1 to 7 do begin c[i]:=random(20)-10; write(c[i]:3); end; end.

• 
  Слайд 14

  Приемы программирования при обработке элементов одномерных массивов

• 
  Слайд 15

  Нахождение суммы элементов массива

  Program pr2; Var c: array [1..7] of integer; i: integer; s:integer; begin randomize;{заполнение массива случайными числами} writeln(‘Одномерный массив случайных чисел C[7]’); s:=0;{обнуление ячейки для нахождения суммы} for i:=1 to 7 do begin c[i]:=random(20)-10; write(c[i]:3); s:=s+c[i]; {нахождение суммы элементов} end; writeln(‘Сумма элементов массива С[7]=’,s); end.

• 
  Слайд 16

  Нахождение произведения элементов массива

  Program pr3; Var c: array [1..7] of integer; i: integer; p:real; begin randomize;{заполнение массива случайными числами} writeln(‘Одномерный массив случайных чисел C[7]’); p:=1;{инициализация ячейки для получения произведения} for i:=1 to 7 do begin c[i]:=random(20)-10; write(c[i]:3); p:=p*c[i]; {нахождение произведения элементов} end; writeln(‘Произведение элементов массива С[7]=’,p); end.

• 
  Слайд 17
  

  Нахождение среднего арифметического элементов, удовлетворяющих какому-то условию массива

  Program pr4; Var c: array [1..7] of integer; i, k,s: integer; sr:real; begin randomize;{заполнение массива случайными числами} writeln(‘Одномерный массив случайных чисел C[7]’); s:=0; k:=0; for i:=1 to 7 do begin c[i]:=random(20)-10; write(c[i]:3); if c[i] mod 2 =0 then {проверка условия четности} begin k:=k+1; {подсчет количества четных элементов} s:=s+c[i]; {вычисление суммы четных элементов} end; end; sr:=s/k; {вычисление среднего арифметического} writeln; writeln(‘среднее арифметическое четных элементов С[7]=’,sr:5:2); end.

• 
  Слайд 18

  Вид экрана после выполнения программы:

  Одномерный массив случайных чисел C[7] 9 1 -6 -1 -2 7 0 среднее арифметическое четных элементов С[7]= -2.67

• 
  Слайд 19

  Нахождение наибольшего/максимального элемента в одномерном массиве

  Program pr5; Var c: array [1..7] of integer; i, max: integer; begin randomize;{заполнение массива случайными числами} writeln(‘Одномерный массив случайных чисел C[7]’); max:=-32000;{задание заведомого маленького значения переменной max} for i:=1 to 7 do begin c[i]:=random(20)-10; write(c[i]:3); if c[i] >max then {сравнение значения элемента массива и значения переменной max } begin max:=c[i]; {присвоение большего значения массива переменной max} end; end; writeln; writeln(‘наибольшее значение элементов массива С[7]=’,max); end.

• 
  Слайд 20
  

  Program pr6; Var c: array [1..7] of integer; i, max: integer; begin randomize;{заполнение массива случайными числами} writeln(‘Одномерный массив случайных чисел C[7]’); for i:=1 to 7 do begin c[i]:=random(20)-10; write(c[i]:3); end; max:=c[1];{задание первого значения переменной max – первого элемента массива} for i:=2to 7 do if c[i] >max then max:=c[i]; {присвоение большего значения массива переменной max} writeln; writeln(‘наибольшее значение элементов массива С[7]=’,max); end.

• 
  Слайд 21

  Вид экрана после выполнения программы:

  Одномерный массив случайных чисел C[7] 5 -1 -3 3-10 -6 1 наибольшее значение элементов массива С[7]=5

• 
  Слайд 22

  Решение примеров

  Культин Н. Задача 153 Написать программу, которая вводит с клавиатуры одномерный массив из 5 целых чисел и выводит количество ненулевых элементов. Перед вводом каждого элемента на экране должна появляться подсказка с его номером. Рекомендуемый вид экрана: После ввода каждого числа нажмите a[1]=12 a[2]=0 a[3]=3 a[4]=-1 a[5]=0 В массиве 3 ненулевых элемента

• 
  Слайд 23

  Решение:

  {подсчет количества ненулевых элементов} Const Size=5; Var a:array[1..size] of integer; n:integer; {кол-воненулевыхэлементов} i:integer; {индекс} begin writeln(‘Ввод массива целых чисел’); writeln(‘После ввода каждого числа нажимайте ’); n:=0; for i:=1 to size do begin write (‘a[‘, I ,’]=’); readln(a[i]); if a[i]0 then n:=n+1; end; writeln(‘В массиве ', n, ‘ненулевых элемента.’); readln; end.

• 
  Слайд 24

  Результат выполнения программы

  Вводмассивацелыхчисел После ввода каждого числа нажимайте a[1]=12 a[2]=0 a[3]=3 a[4]=-1 a[5]=0 В массиве 3ненулевых элемента.