1

Технологическая карта лекционного занятия

Учебная дисциплина

ИНФОРМАТИКА

Тема занятия:

Массивы в языке программирования Pascal

Цель:

Дать представление об одномерном, двумерном

массиве и подпрограммах. Рассмотреть способы

формирования, ввода, вывода элементов массива.

Учебные задачи:



Образовательная: сформировать у обучающих-

ся

представление

об

одномерном,

двумерном

массиве, ознакомить с правилами описания мас-

сивов, с алгоритмами формирования элементов

массива, а также с правилами ввода, вывода эле-

ментов массива.



Развивающая:

развитие

памяти,

мышления,

внимания,

формирование

приемов

логического

мышления.



Воспитательная:

воспитание

аккуратности,

точности, интереса к программированию.

Тип занятия:

Комбинированный

Вид занятия:

лекция

Уровень освоения:

I уровень

Материально-техническое оснащение:

ПК, доска

Учебно-методическое оснащение:

Рабочая программа, КТП, технологическая карта

занятия, презентационный материал, контрольно-

оценочные средства

Междисциплинарные связи:

математика

Ход учебного занятия

Этапы занятия

Время,

мин

Деятельность преподавателя

1.

Организационный момент

2

Приветствие, проверка присутствующих,

внешнего вида студентов, проверка го-

товности обучающихся к учебному заня-

тию; заполнение журнала.

2.

Этап всесторонней проверки до-

машнего задания.

12

Тестирование по теме «Основы языка

программирования».

3.

Формулировка темы, цели занятия

2

Сообщение темы, цели занятия.

4.

Актуализация знаний

5

1.

Что такое типы данных?

2.

Какие типы данных вы знаете?

3.

Какие циклы вы знаете?

4.

Когда используют цикл For?

5.

Объясните как работает цикл с парамет-

ром.

5.

Изучение нового материала

40

1).

Понятие «Массив»

2).

Одномерные массивы

2



Описание одномерных массивов



Способы заполнения массива



Вывод элементов массива

3).

Двумерные массивы



Описание двумерных массивов



Способы заполнения массива

6.

Первичное закрепление

20

Решение задач

7.

Подведение итогов занятия

5

Обобщение темы, комментарии, выстав-

ление отметок.

8.

Домашнее задание

2



Выучить конспект

9.

Рефлексия

2

Акцентирует внимание на конечных ре-

зультатах учебной деятельности обучаю-

щихся на учебном занятии:

Сегодня на занятии я запомнил(а)…

Сегодня на занятии я узнал(а)…

Сегодня на занятии мне понравилось…

Массивы в языке

программирования Pascal

ПЛАН:



Понятие «Массив»



Одномерные массивы



Описание одномерных массивов



Способы заполнения массива



Вывод элементов массива



Двумерные массивы



Описание двумерных массивов



Способы заполнения массива

Понятие «Массив»

Массив –упорядоченный набор однотипных

элементов, объединенных одним именем.

ОДНОМЕРНЫЕ

Массивы

1

2

3

4

5

А

5

-3,5

0

1,5

-2

А[1]

A[2]

A[3]

A[4]

A[5]

1

2

3

5

-3,5

0

1,5

-2

1. Одномерные массивы

Дан массив: A

1

, A

2

, A

3

, … , A

n

A

1

– первый элемент массива

A

3

– третий элемент массива

…………………………………………………..

A

n

– последний элемент массива

A – имя массива

1, 2, 3, … , n – индексы (порядковые номера) элементов массива

1.1 Описание одномерного массива

Объявление массива в разделе описания переменных

VAR

ИМЯ:ARRAY[1..N]OF ТИП;

Имя

массива

Количество

элементов

Тип

элементов

Array, Of – служебные слова (Array – «массив», Of – «из»)

1.1 Описание одномерного массива

Например:

VAR A:ARRAY[1..10]OF Integer;

VAR В:ARRAY[0..50]OF Real;

Количество элементов массива называется - размерностью

Размерность массива

=

максимальное значение индекса

–

минимальное значение индекса

1.2 Способы заполнения одномерных массивов

2 способ. С помощью оператора присваивания (по формуле):

For i:=1 to 10 do

A[i]:=i;

1 способ. Ввод каждого элемента с клавиатуры:

For i:=1 to 10 do

Read(A[i]);

3 способ. С помощью генератора случайных чисел:

Randomize;

For i:=1 to 10 do

A[i]:=Random(100);

1.3 Вывод элементов одномерного массива

1 способ. Вывод элементов массива в строку, разделив пробелом:

For i:=1 to 10 do

Write(A[i],’ ’);

2 способ. Вывод элементов массива в столбец:

For i:=1 to 10 do

Writeln(A[i]);

3 способ. Вывод элементов массива в столбец с пояснениями:

For i:=1 to 10 do

Writeln(’A[’,i,’]’,’=’,A[i]);

2. Двумерные массивы

-5

1,5

0,5

-1

8

4

0,2

5

2,5

-3

0

-7

0,8

-2

5

Двумерный массив – прямоугольная таблица (матрица),

которая состоит из строк и столбцов.

Местоположение каждого элемента определяется номером

строки и номером столбца.

2. Двумерные массивы

1

2

3

4

5

1

A[1,1]

A[1,2]

A[1,3]

A[1,4]

A[1,5]

2

A[2,1]

A[2,2]

A[2,3]

A[2,4]

A[2,5]

3

A[3,1]

A[3,2]

A[3,3]

A[3,4]

A[3,5]

j

i

A – имя массива

i,j – индексы

-5

1,5

0,5

-1

8

4

0,2

5

2,5

-3

0

-7

0,8

-2

5

2.1 Описание двумерных массивов

Объявление массива в разделе описания переменных

VAR

ИМЯ:ARRAY[1..M,1..N]OF ТИП;

Имя

массива

Количество

элементов

элементов

Array, Of – служебные слова (Array – «массив», Of – «из»)

Количество

строк

Количество

столбцов

2.2 Способы заполнения двумерных массивов

1 способ. С помощью генератора случайных чисел:

Randomize;

For i:=1 to 3 do

begin

For j:=1 to 5 do

begin

A[i,j]:=Random(50);

Write(A[i,j]:4);

end;

Writeln;

end;

2.2 Способы заполнения двумерных массивов

2 способ. С помощью оператора присваивания (по формуле):

For i:=1 to 3 do

begin

For j:=1 to 5 do

begin

A[i,j]:=2*(i+j);

Write(A[i,j]:4);

end;

Writeln;

end;

3. Решение задач

Задача 1.

Сформировать случайным образом одномерный массив из 10 целых чисел. Найти сумму всех

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

Program Pr_1;

Var A:array[1..10] of integer;

i,j,S:intrger;

Write(A[i]:4);

S:=S+A[i];

End;

Begin

Randomize;

For i:=1 to 10 do begin

A[i]:=random(20);

Writeln(‘S=‘,S);

End.

1

2

3

3. Решение задач

Задача 2.

Вывести на экран матрицу размером 5x6, элементами которой являются целые случайные

числа. Определить сумму элементов каждой строки.

Begin

Randomize;

For i:=1 to 5 do begin

2

Writeln(‘S=‘,S);

End;

End.

1

Var A:array[1..5,1..6] of integer;

i,j,S:intrger;

3

S:=0;

For j:=1 to 6 do begin

A[i,j]:=random(20);

Write(A[i,j]:4);

S:=S+A[i,j];

End;

Program Pr_2;

3. Решение задач

Задача 3.

Сформировать матрицу вида: 1 1 1 1 1

2 2 2 2 2

3 3 3 3 3

end;

Writeln;

end;

end.

1

For i:=1 to



do begin

For j:=1 to



do begin

A[i,j]:=



;

Write(A[i,j]:4);

Program Pr_3;

Var A:array[1..



,1..



] of integer;

i,j:integer;

Begin

2

3. Решение задач

Задача 4.

Сформировать матрицу вида:

1 0 1 0 1

1 0 1 0 1

1 0 1 0 1

1 0 1 0 1

1 0 1 0 1

Домашнее задание



Выучить конспект

Рефлексия



Сегодня на занятии я запомнил(а)…



Сегодня на занятии я узнал(а)…



Сегодня на занятии мне понравилось…

Тест "Основы языка программирования"

1)

Какие служебные слова необходимы для записи полного условного оператора на языке

Паскаль? (1 балл)

a)

if, then

b)

if, then, else

c)

then, else

d)

if

2)

После слова IF в программе записывается: (1 балл)

a)

список команд, которые выполняются если условие ложно

b)

список команд, которые выполняются если условие истинно

c)

условие

d)

любые команды пользователя

3)

После слова THEN в программе записывается: (1 балл)

a)

список команд, которые выполняются если условие ложно;

b)

список команд, которые выполняются если условие истинно

c)

условие

d)

любые команды пользователя

4)

После слова ELSE в программе записывается: (1 балл)

a)

список команд, которые выполняются если условие ложно

b)

список команд, которые выполняются если условие истинно

c)

условие

d)

любые команды пользователя

5)

Если известно число повторений некоторых действий, используют цикл ... (1 балл)

a)

Repeat

b)

While

c)

For

6)

В чем заключается различие между процедурами Write и Writeln? (1 балл)

a)

Writeln имеет возможность записи выражения с определенной шириной поля

вывода

b)

После вывода значения при помощи Write происходит перевод курсора на

следующую строку

c)

После вывода значения при помощи Writeln происходит перевод курсора на

следующую строку

d)

Ничем

7)

Напишите, что будет выведено на экран в ходе выполнения фрагмента программы: (2

балл)

FOR k:=1 TO 4 do

Write(k);

a)

K=4

b)

K=1234

c)

1234

d)

4

8)

Какой оператор организует цикл с предусловием? (1 балл)

a)

while условие do <оператор>

b)

repeat <операторы > until условие

c)

while условие until <оператор>

d)

repeat <операторы > do условие

9)

Какое значение переменной S будет напечатано после выполнения фрагмента

программы ? (2 балл)

A:=2;

B:=3;

IF A<B Then S:=A*B Else S:=A+B;

Writeln(S);

Ответ:6

10)

Какое значение будет принимать переменная х после выполнения фрагмента

программы ? (2 балл)

a :=3; b := 4;

if a>b then x := a * b else x := a

Ответ:3

11)

Что означает знак := в языке программирования ПАСКАЛЬ? (1 балл)

a)

Присваивание

b)

Деление

c)

Равенство

d)

Сравнение

12)

Что означает в Паскале точка с запятой? (1 балл)

a)

Конец цикла

b)

Конец строки программы

c)

Отделяет операторы друг от друга

d)

Конец программы

13)

Раздел описания переменных начинается со слова: (1 балл)

a)

Var

b)

Begin

c)

Program

d)

Integer

Критерии:

90-100% (15-16) – отлично

70-89% (12-14) – хорошо

50-69% (8-11) – удовлетворительно

0-49% (0-7) – неудовлетворительно