Содержание
-
Власова О.А. СОШ №5, Елабуга
Одномерные массивы программирование на Паскале
-
Власова О.А. СОШ №5, Елабуга
Рассматриваемые вопросы
- понятие одномерного массива
- поиск максимального элемента массива
- описание массива
- пример задачи (ЕГЭ)
- заполнение одномерного массива
- вывод значений элементов массива
-
Власова О.А. СОШ №5, Елабуга
Например:семейство бабочек;
Понятие одномерного массива поле цветов;
-
Власова О.А. СОШ №5, Елабуга
Понятие одномерного массива Таблица температур за неделю
-
Власова О.А. СОШ №5, Елабуга
Массивы
Массив – это пронумерованная конечная последовательность однотипных величин.
-
Власова О.А. СОШ №5, Елабуга
Характеристики массива:
A[I]
ИМЯ
[индекс]
Массивы
Тип элементов массива
Имя массива
Размер массива
-
Власова О.А. СОШ №5, Елабуга
Массивы
A
массив
3
15
НОМЕР элемента массива (ИНДЕКС)
- A[1]
- A[2]
- A[3]
- A[4]
- A[5]
ЗНАЧЕНИЕ элемента массива
A[2]=10
НОМЕР (ИНДЕКС) элемента массива: 2
ЗНАЧЕНИЕ элемента массива: 10
-
Власова О.А. СОШ №5, Елабуга
Описание массива на Паскале
Массив целых чисел:
- имя
- начальный индекс
- конечный индекс
- тип элементов
Const N=5;
var A: array[1..N ] of integer;
var A : array[ 1 .. 5 ] of integer ;
Размер через константу:
-
Власова О.А. СОШ №5, Елабуга
Заполнение массивов
- с клавиатуры;
- с помощью датчика случайных чисел;
- с помощью формулы.
-
Власова О.А. СОШ №5, Елабуга
Заполнение массивов
Пример Заполнить массив А с клавиатуры
- a[1] =
- a[2] =
- a[3] =
- a[4] =
- a[5] =
- 13
- 10
- 15
- 20
- 25
- for i:=1 to 5 do
- begin
- write('a[', i, ']=');
- read ( a[i] );
- end;
с клавиатуры
-
Власова О.А. СОШ №5, Елабуга
Заполнение массива случайными числами
Вещественное число от 0 до 1 random
- for i:=1 to 10 do
- begin
- a[i]:=random(101); {числаот 1 до 100}
- end;
- Число из интервала [0, M-1]
- random (М)
- Число из интервала [a, b]
- random (b-a+1)+a
-
Власова О.А. СОШ №5, Елабуга
Заполнение массива с помощью формулы
Пример.Заполнить одномерный массив из 10 чисел по формуле b[i]:=i*3 .
- var b: array [1..10] of integer;
- i: integer;
- begin
- for i:=1 to 10 do
- b[i]:=i*3;
- end;
-
Власова О.А. СОШ №5, Елабуга
Вывод массива
- writeln('Массив А:');
- For i:=1 to 3 do
- write (А[i]:4);
- End;
Для одномерного массиваА из 3 элементов:
-
Власова О.А. СОШ №5, Елабуга
- На экране
- Массив А:
- 4 5 7
- Вывод массива
-
Власова О.А. СОШ №5, Елабуга
Максимальный элемент
Задача: найти в массиве максимальный элемент.
Алгоритм:
- самый большой
- max
- max
- max
-
Власова О.А. СОШ №5, Елабуга
- { считаем, что первый элемент – максимальный }
- for i:=2 to N do
- if a[i] > { максимального } then
- { запомнить новый максимальный элемент a[i] }
- Максимальный элемент
-
Власова О.А. СОШ №5, Елабуга
Номер максимального элемента
max := a[1]; { считаем, что первый – максимальный }
iMax := 1;
for i:=2 to N do { проверяем все остальные }
if a[i] > max then { нашли новый максимальный }
begin
max := a[i]; { запомнить a[i] }
iMax := i; { запомнить i }
end;
Дополнение: Найдем номер максимального элемента.
-
Власова О.А. СОШ №5, Елабуга
Программа
const N = 5;
var a: array [1..N] of integer;
i, iMax: integer;
begin
writeln('Исходный массив:');
for i:=1 to N do begin
a[i] := random(100) + 50;
write(a[i]:4);
end;
случайные числа в интервале [50,150)
-
Власова О.А. СОШ №5, Елабуга
iMax := 1; {считаем, что первый – максимальный}
for i:=2 to N do {проверяем все остальные }
if a[i] > a[iMax] then {новый максимальный}
iMax := i; {запомнить i }
writeln; {перейти на новую строку}
writeln('Макс.элемент a[', iMax, ']=',a[iMax]);
end.
поиск максимального
Вывод макс.элемента
Программа /продолжение
-
Власова О.А. СОШ №5, Елабуга
Опишите на языке программирования Pascal алгоритм получения из заданного целочисленного массива размером 30 элементов другого массива, который будет содержать модули значений элементов первого массива.
Пример задачи (ЕГЭ) (2009 Демо)
-
Власова О.А. СОШ №5, Елабуга
A
массив
A[1]<0?
A[2]<0?
Массив B:
5 10 5 2025
Пример задачи (ЕГЭ) (2009 Демо)
- нет
- да
- A[3]<0?
- да
- A[4]<0?
- A[3]<0?
- нет
- да
- Алгоритм:
-
Программа
Власова О.А. СОШ №5, Елабуга
var a,b:array[1..30] of integer;i:integer;
begin
for i:=1 to 30 do
begin
write('a[',i,']=');
read(a[i]);
end;
-
Власова О.А. СОШ №5, Елабуга
- for i:=1 to 30 do
- if a[i]<0 then
- b[i]:=-a[i] else b[i]:=a[i];
- readln;
- for i:=1 to 30 do
- write(b[i]:4);
- Writeln;
- readln;
- end.
Замена отрицательных элементов на положительные
Вывод массива В
-
Власова О.А. СОШ №5, Елабуга
Одномерные массивы (общий вид)
Описание:
- const N = 5;
- var a: array[1..N] of integer;
- i: integer;
- for i:=1 to N do begin
- write('a[', i, ']=');
- read ( a[i] );
- end;
- for i:=1 to N do a[i]:=a[i]*2;
- writeln('Массив A:');
- for i:=1 to N do write(a[i]:4);
Поэлементные операции:
Вывод на экран:
Ввод с клавиатуры:
-
Власова О.А. СОШ №5, Елабуга
Одномерные массивы
На этом уроке мы познакомились:
- с понятием одномерного массива;
-рассмотрели описание массива;
-ввод и вывод одномерного массива;
-рассмотрели примеры решения задач.
Нет комментариев для данной презентации
Помогите другим пользователям — будьте первым, кто поделится своим мнением об этой презентации.