Одномерные массивы. Программирование на Pascal

1. «Одномерные массивы. Программирование на Pascal»

Цели урока
*сформировать понятие одномерного массива;
*научиться описывать массивы в разделе var;
*освоить способы заполнения и вывода
массивов;
*научиться обрабатывать элементы массива в
циклах;
*закрепить навыки написания программ на
Pascal.

2.

Вопросы для повторения:
Что такое переменная?
Какие типы данных вы знаете в Pascal?
Как объявить переменную в
разделе var?
Для чего нужен цикл for?
Надо обработать оценки 30 учеников.
Как это сделать без 30 отдельных
переменных?

3. Понятие одномерного массива

Массив — упорядоченная
последовательность однотипных
элементов с общим именем.
Ключевые термины: имя массива,
индекс, элемент, размер.

4.

5. Описание массива на Pascal

var <имя>: array [<нач_индекс>..<кон_индекс>] of <тип>;
Var
a: array [0..5] of integer;
b: array [1..10] of real;

6. Заполнение массива элементами может быть произведено вручную ,через FOR или WHILE

Вручную:
A[1] := 5; A[2] := 10;
По определенной формуле:
for i := 1 to 10 do A[i] := i * 2;
Ввод с клавиатуры
for i := 1 to 10 do readln(A[i]);
Заполнение случайными числами от 1 до 100
for i:=1 to N do a[i] := Random(100);

7.

Ввод элементов массива X с
помощью цикла while
Program vvod_massiva:
var x: array [1..100] of real;
i, n: integer;
begin
writeln ('введите размер массива');
readln(N);
i:=1;
while (i<=N) do
begin
write('x(',i,')= ');
readln(x[i]);
i:=i+1
end;
end.

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

for i := 1 to 10 do
writeln('A[', i, '] = ', A[i]);
Если массив состоит из элементов
6,7,8,3,-2,-7,4,0,1,-5
На экран выйдет
А[1]=6
A[2]=7
А[3]=8 и т.д.

9. Типичные операции над элементами массива

сумма элементов массива;
поиск максимума/минимума;
подсчёт элементов по условию;
упорядочивание элементов по
возрастанию/убыванию

10. Сумма массива, каждый элемент которого вводится с клавиатуры

Program summa;
Var a: array[1..100] of real;
i, n: integer;
s: real;
Begin
Write (‘n=’); Readln (n);
s:=0;
For i:=1 to n do
begin
write (‘введите число’); readln (a[i]);
s:=s+a[i];
end;
writeln(‘сумма элементов равна ‘,s);
End.

11. Практическая работа:

Задание 1. Объявить массив из 5 целых
чисел, заполнить его значениями 10,
20, 30, 40, 50 и вывести на экран.
Задание 2. Заполнить массив из 7
элементов случайными числами от 1
до 100 и вывести его.
Задание 3. Найти сумму элементов
массива из 6 чисел, введённых с
клавиатуры.

12. Подведение итогов:

Что такое одномерный массив?
Как описать массив в Pascal?
Как обратиться к конкретному
элементу?
Какие способы заполнения массива вы
узнали?