Рабочие листы
к вашим урокам
Скачать
1 слайд
Муниципальное общеобразовательное учреждение
Гимназия №1
Учитель информатики: Скабёлкина М.Ю.
Липецк 2010
10 класс
2 слайд
Цели урока:
овладение умениями и навыками решения задач на нахождение максимального и минимального элементов массива;
формирование умения применять на практике полученные знания.
3 слайд
Устная работа
Фронтальный опрос
4 слайд
5 слайд
6 слайд
![Найдите правильное описание массива
D: array[1..5] of real;
Array D: [1..5]...](https://documents.infourok.ru/ca15135d-4296-4955-baad-63e0181c350b/slide_07.jpg "Найдите правильное описание массива
D: array[1..5] of real;
Array D: [1..5]...")
7 слайд
Найдите правильное описание массива
D: array[1..5] of real;
Array D: [1..5] of real;
D[1..5]:array of integer;
<имя массива>:= array [<кол-во элементов>] of <тип>;
8 слайд
Для заполнения массива случайными числами мы должны подключить датчик случайных чисел, используя команду…
Clrscr;
A[i]:=?;
Randomize;
9 слайд
Для подсчета количества положительных элементов массива будем использовать условие…
If a[i]>0 then k:=k+1;
If a[i]>=0 then k:=k+a[i];
If a[i]>=0 then k:k+1;
10 слайд
Нахождение минимального (максимального) элемента массива
-52
Максимальный элемент?
-9 5 -18 59 79 95 74 -52 17 19
Минимальный элемент?
95
11 слайд
Алгоритм нахождения минимального и максимального элемента массива
1.Пусть первый элемент массива – минимальный (максимальный).
2.Пока не конец массива:
Сравниваем каждый элемент массива с выбранным минимальным (максимальным):
Если текущий элемент массива меньше минимального (больше максимального), то присваиваем минимальному (максимальном) числу - значение текущего элемента массива.
12 слайд
Схема работы алгоритма
7 2 -5 4
Min:=7
2<7
Min:=2
Min:=-5
4<-5
Min:=-5
-5<2
нет
да
да
![Программаprogram prim1;
var a:array [1..10] of integer;
i:integer; min...](https://documents.infourok.ru/ca15135d-4296-4955-baad-63e0181c350b/slide_13.jpg "Программаprogram prim1;
var a:array [1..10] of integer;
i:integer; min...")
13 слайд
Программа
program prim1;
var a:array [1..10] of integer;
i:integer; min:integer;
for i:=1 to 10 do begin
a[i]:=random(30);
writeln (‘znas4enie’,i, ‘elementa massiva=’, a[i]);
end;
min:=a[1];
for i:=1 to 10 do begin
if a[i]<min then min:=a[i];
end;
writeln(‘min=’,min);
readln;
end.
begin
randomize;
14 слайд
15 слайд
Самостоятельное выполнение заданий на компьютере
16 слайд
Домашнее задание
Дан массив а(10), заполненный датчиком случайных чисел. Найти наибольший элемент массива и увеличить его в 3 раза.
17 слайд
Учитель информатики
Скабёлкина М.Ю.
10 класс
Рабочие листы
к вашим урокам
Скачать
6 661 606 материалов в базе
Настоящий материал опубликован пользователем Горская Елена Анатольевна. Инфоурок является информационным посредником и предоставляет пользователям возможность размещать на сайте методические материалы. Всю ответственность за опубликованные материалы, содержащиеся в них сведения, а также за соблюдение авторских прав несут пользователи, загрузившие материал на сайт
Если Вы считаете, что материал нарушает авторские права либо по каким-то другим причинам должен быть удален с сайта, Вы можете оставить жалобу на материал.
Удалить материал
Ваша скидка на курсы
40%
Курс повышения квалификации
72/180 ч.
Курс профессиональной переподготовки
300/600 ч.
Курс профессиональной переподготовки
300/600 ч.
Мини-курс
4 ч.
Оставьте свой комментарий
Авторизуйтесь, чтобы задавать вопросы.