Презентация к уроку информатики Массивы

ВВОД МАССИВА :

Program vvod;

Const maxM=10;

Var tab1: array[1..maxM] of integer;

i: integer;

Begin

For i:=1 to maxM do

begin

writeln(' Введите элементы массива ') ;

readln(tab[i]);

end;

End.

ВЫВОД МАССИВА :

Program vivod;

Const maxM=10;

Var tab1: array[1..maxM] of integer;

i: integer;

Begin

For i:=1 to maxM do

begin

writeln(' В ы вод элементов массива ') ;

writeln (tab[i]);

end;

End.

Поиск элемента с заданными свойствами.

• Поиск элемента с заданными свойствами.
• Поиск элемента с заданными свойствами.

Задан одно мерный массив К [1.. 10 ] , определить сумму

отрицательных элемент ов.

• Задан одно мерный массив К [1.. 10 ] , определить сумму отрицательных элемент ов.
• Задан одно мерный массив К [1.. 10 ] , определить сумму отрицательных элемент ов.

Program Poisk;

Const maxM=10;

Var К: array[1..maxM] of integer;

i,S: integer;

Begin

For i:=1 to maxM do

begin

writeln(' Введите элементы массива ') ;

readln(К[i]);

end;

S:=0 ;

for i:=1 to maxM do

if К[i]

writeln('S=',S)

End.

Генерация элементов массива с помощью функции случайных чисел.

.

Program vvod2;

Const maxM=10;

Var tab1: array[1..maxM] of integer;

i: integer;

Begin

Randomize;

{функция позволяет перемешивать числа из диапазона

указанном в функции random и употребляется перед ней }

For i:=1 to maxM do

begin

Tab1[i]:=random(101);

{ Функция random(101) генерирует целые

числа в диапазоне от 0 до 100}

write(tab1[i]);

end;

End.

.

ПОИСК МАКСИМАЛЬНОГО И МИНИМАЛЬНОГО ЭЛЕМЕНТОВ В МАССИВЕ.

Дан одномерный массив K из 10 целых элементов, найти максимальный элемент и его индекс.

Решение:

Program Poisk_2;

Const maxM=10;

Var К: array[1..maxM] of integer;

Max, i, j: integer;

Begin

Randomize;

For i:=1 to maxM do

begin

К[i]:=random(101);

write(К[i]);

end;

Max:=K[1];

J:=1;

for i:=2 to maxM do

if Max

writeln('Максимальный элемент=', max);

writeln(' Индекс макс. э лемента=', j);

End.

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

массива в некотором порядке.

Убывающий порядок - каждый следующий элемент

должен быть меньше предыдущего.

Невозрастающий - каждый следующий элемент

должен быть не больше предыдущего.

Возрастающий - каждый следующий элемент больше

предыдущего.

Неубывающий - каждый следующий элемент не

меньше предыдущего.

max then begin max:=A[j]; K:=j; end; A[K]:=A[i];A[i]:=max; end; " width="640"

СОРТИРОВКА ВЫБОРОМ

For i:=1 to N-1 do

begin

K:=i; max:=A[i]

for j:=i+1 to N do

if A[j]max then

begin

max:=A[j];

K:=j;

end;

A[K]:=A[i];A[i]:=max;

end;

массив это-

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

б) Упорядоченное множество элементов разного типа.

в) К онечное упорядоченное множество элементов одного типа .

Одномерный массив описывается:

а) Var tab1: array[1..78] of integer;

б) var tab1: array[1..5] ;

в) Var tab1= array[1..13] of integer;

Индекс элементов массива может быть:

а) целым числом;

б) вещественным числом;

в) целым положительным.

Как обратиться к 5 элементу массива с именем Е?

а) 5(Е );

б) Е[1..5];

в ) Е[5].