Выбранный для просмотра документ Поиск максим элемента.doc
Скачать материал "Разработка урока "Максимальный и минимальный элементы массива. Поиск макс (мин) элемента в массиве")"
Рабочие листы
к вашим урокам
Скачать
Выбранный для просмотра документ Максимальный и минимальный элементы массива.ppt
Скачать материал "Разработка урока "Максимальный и минимальный элементы массива. Поиск макс (мин) элемента в массиве")"
Рабочие листы
к вашим урокам
Скачать
1 слайд
Максимальный и минимальный элементы массива.
2 слайд
Пример 1. Найти наибольший элемент в массиве.
Var a:array[1..10] of integer;
max,i:integer;
Begin
For i:=1 to 10 do read(a[i]);
max:=a[1];
For i:=2 to 10 do
If a[i]>max then max:=a[i];
Writeln(max);
End.
3 слайд
Пример 2. Найти наибольший элемент и его номер в массиве.
Var a:array[1..10] of integer;
K,max,i:integer;
Begin
For i:=1 to 10 do read(a[i]);
max:=a[1]; k:=1;
For i:=2 to 10 do
If a[i]>max then
Begin
max:=a[i];
k:=i;
end;
Writeln(max,’ ‘,k,’его номер’);
End.
4 слайд
Пример 3. Определить, сколько раз в массиве встречается максимальный элемент.
Var a:array[1..10] of integer;
max,i, k,n:integer;
Begin
Readln(n);
For i:=1 to n do read(a[i]);
max:=a[1];
For i:=2 to n do
If a[i]>max then max:=a[i];
k:=0;
For i:=1 to n do
If a[i]=max then k:=k+1;
Writeln(max);
Writeln(k,’раз’);
End.
Рабочие листы
к вашим урокам
Скачать
Выбранный для просмотра документ 10 класс 9 - 10 уроки.doc
Скачать материал "Разработка урока "Максимальный и минимальный элементы массива. Поиск макс (мин) элемента в массиве")"
Рабочие листы
к вашим урокам
Скачать
Рабочие листы
к вашим урокам
Скачать
6 664 068 материалов в базе
Настоящий материал опубликован пользователем Лось Ирина Валерьевна. Инфоурок является информационным посредником и предоставляет пользователям возможность размещать на сайте методические материалы. Всю ответственность за опубликованные материалы, содержащиеся в них сведения, а также за соблюдение авторских прав несут пользователи, загрузившие материал на сайт
Если Вы считаете, что материал нарушает авторские права либо по каким-то другим причинам должен быть удален с сайта, Вы можете оставить жалобу на материал.
Удалить материалВаша скидка на курсы
40%Курс повышения квалификации
72 ч. — 180 ч.
Курс профессиональной переподготовки
500/1000 ч.
Курс повышения квалификации
72 ч. — 180 ч.
Мини-курс
3 ч.
Мини-курс
3 ч.
Мини-курс
6 ч.
Оставьте свой комментарий
Авторизуйтесь, чтобы задавать вопросы.