Рабочие листы
к вашим урокам
Скачать
1 слайд
массивы
Урок в 9 классе
2 слайд
Домашняя задача
А•В = НОД(А,В)•НОК(А,В), выражаем из формулы НОК(А,В), получаем
В программу Евклид добавляем строчку с этой формулой и выводим НОК в качестве результата.
3 слайд
Программа:
Program nok;
Var a,b,m,n:integer;
C:real;
Begin
Write(‘введите два целых числа’);
Read(a,b);
N:=a;
M:=b;
While m<>n do
Begin
If m>n then m:=m-n
Else n:=n-m
End;
C:=a*b/m;
Write (‘НОК= ‘ , C)
END.
4 слайд
Массив – совокупность данных одного типа с общим для всех элементов именем.
Элементы массива пронумерованы. Номера элементов иначе называются индексами.
Характеристики массива:
Тип – общий для всех элементов массива
Размерность (ранг) – количество индексов массива
Диапазон изменения индекса – определяет количество элементов в массиве
5 слайд
Виды массивов
Одномерные (вектор) – в котором элементы нумеруются одним индексом
Двумерный (матрица) – в котором элементы нумеруются номером строки и номером столбца
6 слайд
Предварительное описание массива
Для одномерного:
Var Имямассива: array[Нижняяграница..ВерхняяГраница] of Типэлементов;
Var a: array[1..100] of integer;
Для двумерного:
Var Имямассива: array[НижняяграницаИндекс1..ВерхняяГраницаИндекс1, НижняяграницаИндекс2..ВерхняяГраницаИндекс2 ] of Типэлементов;
Var y: array[1..3,1..4] of integer;
Массив с тремя (3) строками и четырьмя (4) столбцами
7 слайд
Заполнение массива данными
При вводе данных с клавиатуры
For i:=1 to 5 do readln(a[i]);
С помощью датчика случайных чисел
Randomize;
For i:=1 to n do x[i]:=random(100);(от 0 до 99)
Присваиванием заданных значений
For i:=1 to n do
J:=1 to m do
A[I,j]:=0
Считывая значения элементов из файла
8 слайд
Ввод массива считыванием из файла:
В Паскале имеется три вида файлов:
Текстовый файл (определяется типом text);
Типизированный файл (задаётся предложением
9 слайд
Ввод массива считыванием из файла:
В Паскале имеется три вида файлов:
Текстовый файл (определяется типом text);
Типизированный файл (задаётся предложением file of Тип);
Нетипизированный файл (определяется типом file)
10 слайд
Для работы с файлами в программе необходимо определить файловую переменную (файловый тип) в разделе описаний в виде:
ИмяТипа1=text;
ИмяТипа2=;
11 слайд
Для работы с файлами в программе необходимо определить файловую переменную (файловый тип) в разделе описаний в виде:
ИмяТипа1=text;
ИмяТипа2=file of Тип;
ИмяТипа3=file;
Например:
Type filetype=text;
Var ftmp, f:filetype;
Или
Var f1,lst:text; f2:file;
12 слайд
Однако еще проще произвести заполнение массива , взяв данные из файла.
Можно добавить вывод заполненного массива на экран, тогда надо в цикл добавить строчку
write(a[i]);
![Вывод массиваВ столбец:
For i:=1 to 5 do writeln(a[i]);
В одну строку через п...](https://documents.infourok.ru/b21d0999-6a01-42f4-aa8b-4478a96e8ba8/0/slide_13.jpg "Вывод массиваВ столбец:
For i:=1 to 5 do writeln(a[i]);
В одну строку через п...")
13 слайд
Вывод массива
В столбец:
For i:=1 to 5 do writeln(a[i]);
В одну строку через пробел-разделитель:
For i:=1 to 5 do write(a[i],’ ‘);
С заданием формата, где под каждый элемент отводится 4 позиции:
For i:=1 to 5 do write(a[i]:4);
14 слайд
Вывод матриц в стандартной форме записи – по строкам и столбцам – выполняется при помощи оператора writeln (без параметра)
For i:=1 to n do
Begin
For j:=1 to m do
Write(a[I,j]:4);
Writeln;
End;
15 слайд
Действия с массивами
Вычисление сумм элементов:
S:=0;
For i:=1 to n do s:=s+a[i];
Вычисление произведения:
S:=1;
For i:=1 to n do s:=s*a[i];
Подсчёт количества элементов, удовлетворяющих условию:
k:=0;
For i:=1 to n do
If a[i] mod 2=0 then k:=k+1;
![Поиск элемента с заданным значением:
i:=0;
Repeat;
i:=i+1;
Until (a[i]=0)or (...](https://documents.infourok.ru/b21d0999-6a01-42f4-aa8b-4478a96e8ba8/0/slide_16.jpg "Поиск элемента с заданным значением:
i:=0;
Repeat;
i:=i+1;
Until (a[i]=0)or (...")
16 слайд
Поиск элемента с заданным значением:
i:=0;
Repeat;
i:=i+1;
Until (a[i]=0)or (i=n);
If a[i]=0 then writeln(‘Номер первого нулевого элемента=‘,i) else writeln(‘Таких элементов нет’)
17 слайд
Дома: § 41, 42 № 2
![Закрепление:Сколько элементов в массиве ?
Var B:array [1..7] of integer;
Var...](https://documents.infourok.ru/b21d0999-6a01-42f4-aa8b-4478a96e8ba8/0/slide_18.jpg "Закрепление:Сколько элементов в массиве ?
Var B:array [1..7] of integer;
Var...")
18 слайд
Закрепление:
Сколько элементов в массиве ?
Var B:array [1..7] of integer;
Var C:array[1..5,1..6] of integer;
Определите интервал элементов
Randomize;
For i:=1 to n do x[i]:=random(20);
Randomize;
For i:=1 to n do x[i]:=-40 + random(41);
Рабочие листы
к вашим урокам
Скачать
Презентация к вводному уроку по теме "Массивы". Так как на изучение программирования в 9 классе отпускается не так много уроков, то я постаралась в этой презентации собрать самое основное по теме "Массивы". А именно: ввод и вывод массива, заполнение массива данными, работа с ним. Приводятся примеры участков программного кода на определение суммы элементов массива, произведение элементов, поиск элемента массива, удовлетворяющего заданному условию. Надеюсь что эта презентация поможет учителю в объяснении материала темы.
6 664 963 материала в базе
Настоящий материал опубликован пользователем Ягодова Ольга Васильевна. Инфоурок является информационным посредником и предоставляет пользователям возможность размещать на сайте методические материалы. Всю ответственность за опубликованные материалы, содержащиеся в них сведения, а также за соблюдение авторских прав несут пользователи, загрузившие материал на сайт
Если Вы считаете, что материал нарушает авторские права либо по каким-то другим причинам должен быть удален с сайта, Вы можете оставить жалобу на материал.
Удалить материал
Ваша скидка на курсы
40%
Курс профессиональной переподготовки
300 ч. — 1200 ч.
Курс повышения квалификации
72 ч. — 180 ч.
Курс повышения квалификации
72 ч. — 180 ч.
Мини-курс
10 ч.
Оставьте свой комментарий
Авторизуйтесь, чтобы задавать вопросы.