Презентация, доклад для подготовки к ЕГЭ Структурированные типы данных

Данные

1

2

3

4

5

6

7

8

Значение элемента массива

Индекс элемента массива

Описание массива

II.
Const m=10;
Var a : array [1.. m] of integer;

III.
Type t=array[1..10] of integer;
Var a : t;

For i:=1 to 7 do A[i]:=’*’;
Как в данном случае должен быть описан массив?

For i:=1 to 7 do readln (A[i]);

for i:=1 to 7 do
begin
write (‘A[‘,i, ‘]=‘);
readln (A[i]);
end;

Randomize;
For i:=1 to n do
Begin
a[i]:=random(10);
Writeln (a[i]);
End;

б) в строку
For i:=1 to 7 do
Write(a[i]:4:2);

Типовые алгоритмы обработки массива

Вычисление суммы, произведения элементов массива
Выбор по условию
Изменение элементов массива удовлетворяющих условию
Нахождение максимального и минимального элементов массива

Присваивается переменной s начальное значение 0
- число, не влияющее на результат сложения

Для каждого элемента массива из переменной s
считывается её текущее значение и складывается
со значением элемента массива;
полученный результат присваивается переменной s.

Алгоритм нахождения суммы элементов массива

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

Изменения:
a [ i ] :=5 – заменить i-ый элемент на число 5
a [ i ] := - a [ i ] – заменить i-ый элемент на противоположный по знаку
a [ i ] := a [ i ] * 2 – удвоить каждый элемент массива
a [ i ] := a [ i - 1]+3 –заменить i-ый элемент предшествующим плюс 3

Что считает программа при заданном условии?

Нахождение наибольшего числа
в стопке карточек с записанными числами:

Повторить действия, описанные в пункте 2 для всех
оставшихся карточек

Алгоритм нахождения наибольшего элементов массива

Нахождение максимального и минимального элементов массива

3. В неотсортированной части массива снова выбирается
максимальный элемент; он меняется местами с первым
неотсортированным элементом массива

Действия пункта 3 повторяются с неотсортированными
элементами массива, пока не останется один
неотсортированный элемент (минимальный)

Сортировка элементов массива по убыванию
выбором осуществляется следующим образом:

for i:=1 to 9 do
begin
imax:=i;
for j:=i+1 to 10 do if a[j]>a[imax] then imax:=j;
x:=a[i];
a[i]:=a[imax];
a[imax]:=x
end;
for i:=1 to 10 do write (a[i],` `);
end;

Программа сортировки элементов массива

Программа вставки элемента
с номером k в массив

…
begin
writeln (‘введите индекс вставляемого элемента’);
readln(k);
For i:=n+1 downto k do
b[i]:=b[i-1]; b[k] :=min;
For i:=1 to n+1 do
Write (b[i]:4);
…

Вставить на k-е место массива элемент, равный наименьшему элементу массива.

2. Напишите программу, которая вычисляет среднюю за неделю температуру воздуха. Исходные данные вводятся с клавиатуры.

Задачи для самостоятельной работы

Задачи

5. Занесите информацию о десяти европейских странах в массивы n (название страны), к (численность населения), s (площадь страны). Выведите названия стран в порядке возрастания плотности их населения.

меню

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

A [2,4]

A [4,2]

Type mas = array[1..5] of array[1..10] of integer;

Type mas = array[1..5, 1..10] of integer;
Var A:mas;

For i:=1 to n do
for j:=1 to m do
readln (a[i , j]);

С клавиатуры

For i:=1 to n do
for j:=1 to m do
a[i , j]:=i*j;

Случайными числами от 0 до 100

Произведением индексов

For i:=1 to n do
for j:=1 to m do
a[i , j]:=random(100)+30;

Случайными числами от ___ до ___?

For i:=1 to n do
for j:=1 to m do
a[i , j]:=sqr(i*j);

for j:=1 to m do
write (a[i , j]);

writeln ('Массив из максимальных значений в строках:');
for i:=1 to m do
begin
max:=a[i,1];
for j:=2 to n do
begin
if a[i,j]>max then max:=a[i,j];
end;
b[i]:=max;
write (b[i]:4);
end;
readln;
end.

1 2 3 4 5

I - J

I+J=N+1

1 2 3 4 5

a42

a51

a24

a15

(i+j

(i+j>n+1) And (i

(i+j>n+1) And (i>j)

(i+jj)

m:=a[1,1];
For i:=2 to n do
if (a[i,i]

меню

Длина строки хранится в первом ее байте, индекс которого равен 0. Объявление типизированной константы для типа string осуществляется так:

const
s: string = 'FreePascal'
…

Существует понятие пустой строки, т.е. строки, которая не имеет элементов. Пустая строка обозначается двумя рядом стоящими апострофами (например, st := '').

…
s1 := 'this is text';
s2 := s1;
…

3. Строки можно объединять с помощью операции конкатенации, которая обозначается знаком +.

…
s1 := 'John';
s2 := 'Black';
s1 := s1 + ' ' + s2;
…

2. Строки можно сравнивать друг с другом с помощью операций отношения.

'abc' > 'ab' (true)
'abc' = 'abc' (true)
'abc' < 'abc ' (false)

…
readln (s1);
write (s1);
…

К отдельному символу строки можно обращаться как к элементу массива символов, например s1[3]. Символ строки совместим с типом char, их можно использовать в выражениях одновременно, например:

…
s1[3] := 'h';
writeln (s2[3] + 'r');
…

…
writeln(ord(st[0]))
…

Выражение str[0]:=#50 устанавливает текущую длину равной 50.

При работе со строками, как правило, возникает необходимость выполнять их копирование, вставку, удаление или поиск. Для эффективной реализации этих действий в Паскале предусмотрены стандартные процедуры и функции.

1. Вставить в заданную позицию строки другую строку.

Примечание.
Процедура insert(subs, s, start) вставляет в строку s подстроку subs, начиная с позиции start.

Алгоритм решения задачи:
Определить значения s1, s2 и i.
С помощью процедуры insert() вставить s2 в s1, начиная с позиции i

Описание переменных:
s, s_old, s_new – исходная строка, заменяемая подстрока, вставляемая подстрока;
i – номер символа строки, с которого начинается подстрока;
l_old – длина заменяемой подстроки.

Алгоритм решения задачи:
Ввести строку, подстроку, которую требуется заменить, и подстроку, которую требуется вставить на место прежней.
Найти место вхождения подстроки в строку с помощью функции pos().
Удалить старую подстроку с помощью процедуры delete().
Вставить новую подстроку, используя процедуру insert().

Var s,s_old,s_new: string;
i,l_old: byte;
begin
write('Insert string: ');
readln(s);
write('What change? ');
readln(s_old);
l_old := length(s_old);
write('What to replace? ');
readln(s_new);
i := pos(s_old,s);
delete(s,i,l_old);
insert(s_new,s,i);
writeln(s);
readln
end.

Алгоритм решения задачи:

Записать в переменную s1 исходную строку.
Узнать начало второй строки и ее длину.
Присвоить s2 результат выполнения функции copy().

Описание переменных:

s – строка;
len – ее длина.

Алгоритм решения задачи:

Введенная пользователем строка записывается в переменную s.
Результат выполнения функции length(s) сохраняется в переменной len и, затем, выводится на экран.

Алгоритм решения задачи:

Присвоить переменной s произвольную строку.
Записать в i и len первый символ, с которого будет производиться удаление, и длину удаляемой последовательности.
Применить процедуру delete() к строке s.
Вывести на экран строку s.

меню

Type
t=set of 1..31;
Var
x2, x3:t;
x4:set of byte;
{ Или без предварительного описания:}
Var
y2: set of char;
a, i: byte;

Можно, предварительно задав тип множества в разделе
пользовательских типов, описать его в разделе описания переменных:

Begin
x1:=[11,7,3,5];
x2:=[ 7,5,3,11];
WriteLn(x1=x2);
{ На экране появиться "TRUE“}

2. Операция "in" - используется для проверки принадлежности какого-либо значения указанному множеству.
Например
WriteLn(5 in x2);
{ На экране TRUE, т.к. 5 есть в множестве x2}

{ На экране появится
1 2 3 4 5 6 }

4. Операция «пересечение множеств" (*)
Например:

{ На экране появится
3 4}

При работе с множествами невозможно обратиться
к какому-либо конкретному элементу множества - это их недостаток.
Но из этого свойства следуют и важные преимущества - ряд операций, которые невозможно совершать с другими типами данных “в одно действие“, а требуются громоздкие алгоритмы.

меню

Такая структура называется двухуровневым деревом. В Паскале эта информация может храниться в одной переменной типа record (запись).

Такая организация данных позволит, например, делать выборки по году рождения или по городу, где живут студенты.

Рассмотрим для начала простейший пример заполнения записи Паскаля и вывода ее на экран.

Пусть нам необходимо заполнить сведения о студенте (Ф.И.О., дата рождения, адрес, курс и группа), а затем вывести эти сведения на экран.

меню

Схема файла

Операторы (стандартные процедуры) работы с файлами
Assign – назначение связей между файловой переменной и файлом на внешнем устройстве;
Reset – открытие файла для чтения;
Rewrite - открытие файла для записи;
Close – закрытие файла (разрыв связей с файловой переменной).

Ввод из текстового файла

2. Златопольский Д. М. Я иду на урок информатики: Задачи по программированию. Книга для учителя. – М.: Издательство «Первое сентября», 2002.

4. Конспекты уроков информатики в 9-11 классах: Практикум по программированию / Авт.-сост. А. А. Чернов. – Волгоград: Учитель, 2005

3. И.Г. Семакин, Е.К. Хеннекер, Т.Ю. Шеина Информатика. Базовый уровень. Учебник для 10 класса - М.: Бином, Лаборатория знаний, 2014

Интернет источники: