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

максимального элемента массива
описание массива
пример задачи (ЕГЭ)
заполнение одномерного массива
вывод значений

цветов;

за неделю

конечная последовательность однотипных величин.

массива
Размер массива

массива
A[2]=10
НОМЕР (ИНДЕКС) элемента массива: 2
ЗНАЧЕНИЕ элемента массива: 10

Массив целых

имя

начальный индекс

конечный индекс

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

Const N=5;
var A: array[1..N ] of integer;

var A : array[ 1 .. 5 ] of integer ;

Размер через константу:

с помощью датчика случайных чисел;
с помощью формулы.

А с клавиатуры
a[1] =
a[2] =
a[3] =
a[4]

13
10
15
20
25

for i:=1 to 5 do
begin
write('a[', i, ']=');
read ( a[i] );
end;

с клавиатуры

от 0 до 1
random
for i:=1 to 10 do
begin
a[i]:=random(101);

Число из интервала [0, M-1]
random (М)

Число из интервала [a, b]
random (b-a+1)+a

Заполнить одномерный массив из 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;

to 3 do
write (А[i]:4);
End;
Для одномерного массива А

4 5 7
Вывод массива

массиве максимальный элемент.
Алгоритм:

элемент – максимальный }
for i:=2 to N do

Максимальный элемент

a[1]; { считаем, что первый – максимальный }
iMax :=

Дополнение: Найдем номер максимального элемента.

= 5;
var a: array [1..N] of integer;

случайные числа в интервале [50,150)

что первый – максимальный}
for i:=2 to N

поиск максимального

Вывод макс.элемента

Программа /продолжение

Pascal алгоритм получения из заданного целочисленного массива размером 30

Пример задачи (ЕГЭ) (2009 Демо)

10 5 20 25
Пример задачи (ЕГЭ)

нет

да

A[3]<0?

да

A[4]<0?

A[3]<0?

нет

да

Алгоритм:

i:integer;
begin
for i:=1 to 30 do
begin

Программа

do
if a[i]

Замена отрицательных элементов на положительные

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

N = 5;
var a: array[1..N] of 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);

Поэлементные операции:

Вывод на экран:

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