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

Массивы

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

Индексированные переменные

Индексированные переменные в Паскале

X[1] X[2] B[8] Y[I]

Y[I-6] Z[I,j] Z[I+1,j]

Числовой ряд

- это несколько чисел, выстроенных по порядку одно за другим

Числа Фибоначчи

1 1 2 3 5 8 13 21 34

F[1]=1, F[2]=1, F[3]=2, F[4]=3

F[5]=5, F[6]=8, F[7]=13, F[8]=21

Числа Фибоначчи

F[3]=F[1]+F[2]

F[4]=F[2]+F[3]

F[I]=F[I-2]+F[I-1]

Для числа 6: F[ 6 ]=F[ 6 -2]+F[ 6 -1]

Задание 1

Запишите в индексном виде, как

получается из числа ряда

последующее:

а) 14 18 22 26 .. б) 6 12 24 48 ..

в) 3 5 9 17 33 65..

Проверьте

А) f[i]=f[i-1]+4

Б) f[i]=f[i-1]*2

В) f[i]=f[i-1]*2-1

Массив

Фиксированное количество

элементов одного типа,

объединенных общим именем

Пример: температура за неделю

Номера

элементов

N

T

1

-10

2

3

-4

-4

4

5

-10

-5

6

7

-15

-8

Значения

элементов

T – имя массива

Обращение к элементам: t[ 2 ] – ко второму

К любому t[i]

Объявление массива

Const n=7;

Var t:array[1..n] of integer ;

Const – служебное слово, с которого начинается раздел описаний постоянных величин

N – количество элементов массива

T – имя массива

Array – служебное слово (с англ. Массив, набор)

[1..n] – номера первого и последнего элемента

Of - из integer – тип элементов массива (real, integer,char)

Структура программы для работы с массивами

1. Заполнение массива

2. Вывод его на экран

3. Обработка массива (количество, сумма, поиска максимума или минимума)

4. Вывод результата или изменённого массива

1) Заполнение массива

1) С помощью операторов присваивания

t[1]:=-10; t[2]:=-4; t[3]:=-4;…

2) С клавиатуры

WriteLn(‘ Введите ’,n,’ температур ’);

For i:=1 to n do

ReadLn(t[i]);

3) С помощью генератора случайных чисел: Randomize;

For i:=1 to n do

t[i]:=random(-10,10);

Randomize; – вызов генератора случайных чисел

Random(3,5) – выбирается случайное число из диапазона [ 3,5 ]

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

For i:=1 to n do

Write(t[i],’ ‘); { вывод i – того элемента }

WriteLn; { перевод курсора в начало следующей строки }

Задача 1

Составить программу

нахождения средней

температуры за неделю.

начало

Создание и

вывод массива

s = 0

i = 1,n

s = s + t[i]

s/n

конец

Program example;

Const n=7;

Var t:array[1..n] of integer;

s,i:integer;

Begin

Writeln(‘ Введите ’,n,’ чисел ’);

For i:=1 to n do

Readln(t[i]);

For i:=1 to n do

Write(t[i],’ ‘);

Writeln;

s:=0;

For i:=1 to n do

s:=s+t[i];

Writeln(‘ Средняя t = ’,s/n:4:2);

End.