Массивы. Паскаль. 9 класс

Массивы.

•Массив - конечный набор данных одного типа и имеющих одно имя;

•Элемент массива - отдельная переменная, входящая в массив;

•Размерность массива – количество элементов, которое содержит массив.

•Индекс элемента массива - номер элемента в массиве;

Вы уже знаете о суперспособностях современного учителя?

Тратить минимум сил на подготовку и проведение уроков.

Быстро и объективно проверять знания учащихся.

Сделать изучение нового материала максимально понятным.

Избавить себя от подбора заданий и их проверки после уроков.

Наладить дисциплину на своих уроках.

Получить возможность работать творчески.

=> ПОЛУЧИТЬ СУПЕРСПОСОБНОСТИ УЧИТЕЛЯ <=

Просмотр содержимого документа
«Массивы. Паскаль. 9 класс»

Массивы. Паскаль. 9 класс

Каратун О.В.

МАОУ «Зональненская СОШ» Томского района

Определение 1

Массив – пронумерованная совокупность ячеек памяти, названная одним именем

1 2 3 4 5 6 7

Индекс (порядковый номер) элемента массива

Значение элемента массива

Имя массива

A [ 4 ] := 11;

МАССИВЫ

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

A[1] A[2] A[3] A[n-1] A[n]

… .

-2

A[1] - Первый элемент массива; A[1]:= 3 ;

A[2] - Второй элемент массива; A[2]:= 12 ;

.....

A[n] - n-й элемент массива. A[n]:= 11 ;

Описание массива 2

Объявление массива в разделе описания переменных:

Var имя :ARRAY[1.. N ] OF тип ;

Количество элементов

Например:

Тип элементов

Имя массива

Var A :Array[1.. 10 ] of Integer ;

Var Tem :Array[1.. 100 ] of Real ;

Описание массива Конструкция

: array[ мин знач. индекса .. макс знач.индекса ] of ;

Var

А: array[1..17] of integer;

mas: array[ 1 .. 20 ] of integer;

X: array[ 3..4 ] of real;

S1: array[ 1..3 ] of char;

Способы заполнения массива

1 способ . Ввод каждого значения с клавиатуры:

for i :=1 to 10 do read (a[i]);

2 способ . С помощью оператора присваивания (по формуле):

for i :=1 to 10 do a[i]:=i;

3 способ . С помощью оператора присваивания (случайными числами):

randomize ;

for i:=1 to 10 do a[i]:=random(100);

Основные алгоритмы для работы с массивами

1. Заполнение одномерного массива значениями

1) Заполнение с клавиатуры.

For i:=1 to n do

read(a[i]);

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

1 способ. Элементы массива можно вывести в строку, разделив их пробелом:

for i:=1 to 10 do write (a[i], ' ');

a[1]=4

a[2]=1

a[3]=6

a[4]=3

a[5]=8

a[6]=5

a[7]=9

a[8]=4

a[9]=8

a[10]=7

2 способ . Вывод с комментариями:

for i:=1 to 10 do writeln ('a[', i, ']=', a[i]);

2. Заполнение случайным образом

RANDOMIZE;

For i:=1 to n do

begin

a[i]:=random(m);

Write(a[i],’ ‘);

End;

Пример: m – диапазон случайных значений, для m=10 диапазон от 0 до 9

Заполнения массива A (10) случайными числами и вывод элементов массива

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

program n_2 ; var i: integer;

a: array[1..10] of integer;

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

begin for i:=1 to 10 do a[i]:=random(100);

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

for i:=1 to 10 do write (a[i] ,` `) ; end .

3. Заполнение по формуле

For i:=1 to n do

a[i]:=;

Например:

For i:=1 to n do

a[i]:=sin(i)-cos(i);

Вывод значений массива на экран по горизонтали (в строку);

For i:=1 to n do

Write(a[i]:5);

Вывод значений массива на экран по вертикали (в столбец);

For i:=1 to n do

Writeln(a[i]);

Вычисление суммы элементов массива

Суммирование элементов массива

осуществляется за счёт поочерёдного добавления слагаемых :

Определяется ячейка памяти (переменная s ),

в которой будет последовательно накапливаться

результат суммирования

Переменной s присваивается начальное значение 0

- число, не влияющее на результат сложения

Для каждого элемента массива из переменной s

считывается её текущее значение и складывается

со значением элемента массива;

полученный результат присваивается переменной s.

Вычисление суммы элементов массива

s := 0

s = 0

s := s + a [1]

s = 0+ a [1]

s := s + a [2]

s = 0+ a [1]+ a [2]

s := s + a [3]

s = 0+ a [1]+ a [2]+ a [3]

…

s := s + a [n]

s = 0+ a [1]+ a [2]+ a [3]+…+ a [n]

Основной фрагмент программы:

s:=0;

for i:=1 to n do s:=s+a[i];

Задача. Вычисление суммы элементов массива

program n_3;

var s, i: integer;

a:array[1..10] of integer;

begin

s:=0;

for i:=1 to 10 do a[i]:=random(100);

for i:=1 to 10 do write (a[i],' ');

for i:=1 to 10 do s:=s+a[i];

writeln ('s=', s)

end.

Задание: Заполнить массив с именем X случайными значениями и вывести эти значения на экран. Размерность массива 12, все элементы целого типа. Удвоить значение каждого элемента массива и вывести на экран.

program n_3;

var s, i: integer;

x: array [1..12] of integer;

begin

s:=1;

for i:=1 to 12 do x[i]:=random(100);

for i:=1 to 12 do write (x[i],' ');

for i:=1 to 12 do s:=x[i]*x[i];

writeln ('s=', s)

end .

Нахождение наибольшего элемента

в стопке карточек с записанными числами :

1) Взять верхнюю карточку, записать на доске

(запомнить) число как наибольшее.

2) Взять следующую карточку, сравнить числа. Если

на карточке число больше, то записать это число.

Повторить действия, описанные в пункте 2 для всех

оставшихся карточек

При организации поиска наибольшего элемента массива правильнее искать его индекс.

a[imax] then imax:=i; write ( 'Наибольший элемент a[',imax,']=', a[imax]) end ." width="640"

Программа поиска наибольшего элемента в массиве

program n _4;

var s, i, imax : integer;

a: array[1..10] of integer;

b egin

s:=0;

for i:=1 to 10 do a[i] :=random(100) ;

for i:=1 to 10 do write (a[i] ,` `) ;

imax:=1 ;

for i:=2 to 10 do

if a[i]a[imax] then imax:=i;

write ( 'Наибольший элемент a[',imax,']=', a[imax])

end .

Поиск элемента, равного 50

program n _ 5 ;

var n, i: integer;

a: array[1..10] of integer;

b egin

randomize;

for i:=1 to 10 do a[i] :=random(100) ;

for i:=1 to 10 do write (a[i] ,` `) ;

n := 0;

for i:= 1 to 10 do

if a[i] =50 then n :=i;

if n=0 then write( 'Нет' ) else write (i)

end .

Будет найден последний из элементов, удовлетворяющих условию.

Поиск элемента, равного 50

program n _5_1;

var n, i: integer;

a: array[1..10] of integer;

b egin

randomize;

for i:=1 to 10 do a[i] :=random(100) ;

for i:=1 to 10 do write (a[i] ,` `) ;

i := 0;

repeat

i:=i+1;

until (a[i]=50) or (i=10);

if a[i]=50 then write(i) else write('Нет')

end .

Будет найден первый из элементов, удовлетворяющих условию.

50 then k:=k+1; write ('k=', k) end . 10 6 0 2 1 5 3 5 8 14 2 8 50 10 5 1" width="640"

Подсчет количества элементов

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

program kolich ;

var k, i: integer;

a: array[1..10] of integer;

b egin

randomize;

for i:=1 to 10 do a[i] :=random(100) ;

for i:=1 to 10 do write (a[i] ,` `) ;

k := 0;

for i:=1 to 10 do

if a[i]50 then k:=k+1;

write ('k=', k)

end .

6 0

2 1

5 3

5 8

2 8

5 1

1 0 and (a[i]then s := s + a[i]; write (‘ s =', s ) end . 10 50 1 3 50 14 21 50 10 21" width="640"

Сумма значений элементов, удовлетворяющих условию

program sum ;

var s, i: integer;

a: array[1..10] of integer;

b egin

randomize;

for i:=1 to 10 do a[i] :=random(100) ;

for i:=1 to 10 do write (a[i] ,` `) ;

s := 0;

for i:=1 to 10 do

if a[i] 1 0 and (a[i]then s := s + a[i];

write (‘ s =', s )

end .

Сортировка массива

Сортировка элементов массива по невозрастанию

выбором осуществляется следующим образом:

1. В массиве выбирается максимальный элемент

2. Максимальный и первый элемент меняются местами

(первый элемент считается отсортированным)

3. В неотсортированной части массива снова выбирается

максимальный элемент; он меняется местами с первым

неотсортированным элементом массива

Действия пункта 3 повторяются с неотсортированными

элементами массива, пока не останется один

неотсортированный элемент (минимальный)

Сортировка массива

Индекс

Значение

Шаги

Итог:

Опорный конспект

Массив - это поименованная совокупность однотипных элементов, упорядоченных по индексам, определяющим положение элементов в массиве.

var : array [ ..

] of тип_элементов;

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

Ввод с клавиатуры

Присваивание значений

Задачи по обработке массива

Суммирование элементов

Поиск элемента во свойствам

Сортировка элементов массива

Порядок составления программы содержащей массив

Описать массив
Заполнить массив одним из 3-х способов ( если массив заполняется случайным образом или по формуле, то полученные значения элементов массива вывести на экран)
Записать алгоритм решения поставленной задачи
Вывести результат на экран.