- •Полный обучающий курс
- •Содержание
- •Ввод-вывод Занятие 1. Язык программирования Паскаль. Знакомство со средой программирования Турбо Паскаль. Основные понятия. Первая программа. Оператор присваивания.
- •Запуск интегрированной среды программирования.
- •Оператор присваивания. Арифметические выражения
- •Порядок выполнения операций
- •Основные определения. Типы данных.
- •Типы данных.
- •Сложные типы
- •Занятие 2. Ввод - вывод. Операторы Read (Readln), Write (Writeln). Простейшие линейные программы
- •Операторы Write и WriteLn
- •Операторы Read и ReadLn
- •I Арифметические функции
- •II Функции преобразования типов
- •III Функции для порядковых типов
- •IV Процедуры для порядковых типов
- •Графика Занятие 1: Графический режим. Инициализация графического режима. Построение точки, линии.
- •1) Инициализация графики, подготовительные работы, управление цветом, закрытие режима:
- •Система координат в графическом режиме.
- •Занятие 2: Построение дуги, окружности, прямоугольника, эллипса.
- •Установка стиля и цвета закраски. Закрашивание фигур.
- •Занятие 3: Вывод текста.
- •Занятие 4. Процедуры рисования закрашенных фигур.
- •Для любопытных. Окно в графическом режиме. Решение задач.
- •Операторы условия и выбора Занятие 1. Разветвляющиеся алгоритмы. Оператор условия If. Разветвляющиеся алгоритмы
- •Занятие 2. Логический тип данных. Логические операции not, and, or. Нахождение значений логических выражений. Самостоятельная работа. Логический тип данных
- •Самостоятельная работа
- •Занятие 3. Вложенные условные операторы. Решение задач.
- •I Выберите с учителем задачи для самостоятельного решения из предложенного списка:
- •II Выберите с учителем задачи для самостоятельного решения из предложенного списка:
- •Занятие 4. Оператор выбора case. Решение задач.
- •Занятие 5. Оператор безусловного перехода Goto. Решение задач.
- •Занятие 6. Контрольная работа
- •Для любознательных
- •Контрольные вопросы
- •Циклы Занятие 1. Циклические алгоритмы. Цикл с предусловием.
- •Цикл с предусловием.
- •Задачи для самостоятельного решения
- •Занятие 2. Цикл с предусловием в графике.
- •Задачи для самостоятельного решения
- •Занятие 3. Контрольная работа
- •Занятие 4. Цикл с постусловием repeat.
- •Задачи для самостоятельного решения
- •Занятие 5. Работа с клавиатурой. Стандартные процедуры read и readLn. Стандартные функции readKey и KeyPressed; их применение в циклах.
- •Стандартная функция readKey
- •Стандартная функция KeyPressed
- •Занятие 6. Цикл со счетчиком.
- •Занятие 7-8. Самостоятельное решение задач.
- •Процедуры и функции Занятие 1. Понятие подпрограммы. Процедуры и функции. Стандартные подпрограммы. Примеры употребления подпрограмм в решении задач.
- •Занятие 2. Формальные и фактические параметры. Вызов по ссылке и по значению. Локальные и глобальные переменные и подпрограммы Формальные и фактические параметры
- •Вызов по ссылке и по значению
- •Параметры-значения
- •Локальные и глобальные переменные и подпрограммы.
- •Занятие 3. Процедуры.
- •Занятие 4. Процедуры в графическом режиме.
- •Занятие 5. Функции.
- •Различие между процедурами и функциями.
- •Задачи для самостоятельного решения
- •Занятие 6. Решение задач
- •Для любознательных. Особенности использования процедур и функций.
- •Заголовок модуля
- •Интерфейсная часть
- •Реализационная часть
- •Инициализационная часть
- •Рекурсия Занятие 1. Понятие рекурсии.
- •Занятие 2. Примеры задач рекурсивного решения в текстовом и графическом режимах.
- •Занятие 3. Косвенная рекурсия.
- •Занятие 4. Решение задач
- •Для любознательных. Ханойские башни. Задача о разрезании прямоугольника
- •Анализ рекурсивных алгоритмов
- •Особенности отладки и компиляции программ, содержащих процедуры и функции
- •Одномерные массивы Занятие 1. Понятие массива. Одномерные массивы. Способы задания одномерных массивов
- •Способы задания одномерных массивов
- •Занятие 2. Доступ к элементам массива
- •Изменение значения некоторых элементов
- •Нахождение номеров элементов с заданным свойством
- •Нахождение количества элементов с заданным свойством
- •Есть ли в данном массиве элементы с данным свойством?
- •Занятие 3. Удаление элементов из одномерного массива.
- •Задачи для самостоятельного решения
- •Занятие 4. Вставка элементов в одномерный массив. Вставка одного элемента
- •Вставка нескольких элементов
- •Задачи для самостоятельного решения
- •Занятие 5. Перестановка элементов массива. Перестановка двух элементов
- •Перестановка части массива
- •Работа с несколькими массивами.
- •Занятие 6. Самостоятельное решение задач.
- •Двумерные массивы Занятие 1. Понятие двумерного массива. Описание типа массива. Формирование значений элементов массива случайным образом.
- •Формирование значений элементов массива случайным образом и с клавиатуры и вывод их на экран
- •Занятие 2. Работа с элементами массива.
- •Нахождение количества элементов с данным свойством
- •Определить, отвечает ли заданный массив некоторым требованиям
- •Изменение значений некоторых элементов, удовлетворяющих заданному свойству
- •Заполнение массива по правилу
- •Задачи для самостоятельного решения
- •1. Найти сумму и количество элементов с заданным условием (хранить эти значения в массивах):
- •2. Найти и вывести на экран индексы заданных элементов массива (если их нет выдать соответствующее сообщение):
- •3. Используя функцию булева типа, определить:
- •4. Измените исходный массив в соответствии с заданием:
- •5. Решите задачу на заполнение массива по определенному правилу.
- •Занятие 3. Вставка и удаление строк и столбцов.
- •Вставка строк и столбцов
- •Удаление строк и столбцов
- •Задачи для самостоятельного решения
- •Занятие 4. Перестановка элементов массива.
- •Задачи для самостоятельного решения
- •Занятие 5. Самостоятельное решение задач.
- •I. Заполнение и анализ элементов массива
- •II. Работа с одномерным и двумерным массивами
- •Занятие 6. Контрольная работа
- •Для любопытных. Графические программы с применением массивов.
- •Методы сортировки массива Занятие 1. Сортировка массива. Способы сортировки массива.
- •Занятие 2. Сортировка вставкой. Сортировка выбором.
- •Сортировка выбором
- •Занятие 3. Сортировка методом простого обмена. Рекурсивная сортировка
- •Cортировка массива с помощью рекурсии.
- •Занятие 4. Сортировка методом слияний.
- •Для любопытных. Рекурсивная сортировка слиянием
- •Занятие 5-6. Самостоятельное решение задач.
- •Строки Занятие 1. Тип данных char. Операции над символами
- •Задачи для самостоятельного решения
- •Занятие 2. Строка. Тип данных string. Строковые переменные, их описание. Длина строки. Операции над строками
- •Задачи для самостоятельного решения
- •Занятие 3. Стандартные функции для работы со строками (concat,copy,length, pos,upcase). Функция Length
- •Функция Upcase
- •Функция Copy
- •Функция Pos
- •Функция Concat
- •Задачи для самостоятельного решения
- •Задачи для самостоятельного решения
- •Занятие 5. Контрольная работа
- •Занятие 6. Решение задач.
- •Для увлеченных программированием. Бегущая строка. Пример программы осыпающихся букв. Строки в графическом режиме.
- •Множества Занятие 1. Множественный тип данных. Множество. Элемент множества. Способы задания множества. Объединение множеств. Разность множеств. Пересечение множеств.
- •Занятие 2. Логические операции над множествами: проверка принадлежности элемента множеству, проверка включения элемента в множество, сравнение множеств.
- •Занятие 3. Примеры решений задач на применение множества.
- •Занятие 4. Самостоятельное решение задач.
- •Запись Занятие 1. Комбинированный тип данных. Запись. Описание записи. Доступ к полям записи. Оператор With. Примеры решения задач
- •Занятие 2. Самостоятельное решение задач
- •Занятие 3. Сортировка записей.
- •Занятие 4. Записи с вариантами.
- •Дополнительно. Решение задач
- •Файлы Занятие 1. Файлы. Виды файлов. Типизированные файлы
- •Процедуры и функции для работы с файлами любого типа
- •Примеры решения задач
- •Занятие 2. Процедуры и функции для работы с типизированными файлами
- •Функция ioResult
- •Занятие 3. Самостоятельное решение задач
- •I Выберите с учителем одну из предложенных ниже задач (тип Integer, real)
- •II Выберите с учителем одну из предложенных ниже задач (тип char)
- •III Выберите с учителем одну из предложенных ниже задач (тип string)
- •IV Выберите с учителем одну из предложенных ниже задач (тип record)
- •Занятие 4. Процедуры и функции работы с файлами. Решение задач
- •Тeкстовые файлы Занятие 1. Тeкстовые файлы, их описание и основные отличия от типизированных файлов.
- •Занятие 2. Способы обмена с текстовыми файлами.
- •Операции чтения из файла
- •Операции записи в файл
- •Логическая функция Eoln
- •Процедура открытия файла для дополнения
- •Занятие 3. Стандартные текстовые файлы Input и Output. Примеры задач
- •Занятие 4. Самостоятельное решение задач
- •Для любознательных. Текстовый режим. Модуль crt. Работа с цветом. Работа с экраном и курсором
- •Нетипизированные файлы Занятие 1. Нетипизированные файлы. Их отличия. Процедуры blockread и blockwrite.
- •Занятие 2. Решение задач
- •Занятие 3. Использование типизированных файлов в качестве нетипизированных
- •Занятие 4. Использование текстовых файлов в качестве нетипизированных.
- •Занятие 5. Примеры решения творческих задач
- •Для любознательных. Дополнительные процедуры и функции работы с файлами
- •Внешние устройства в качестве файлов.
- •Граф Занятие 1. Основные понятия.
- •Занятие 2. Представление деревьев. Основные операции над деревом.
- •Занятие 3. Самостоятельное решение задач.
- •Занятие 4. Идеально сбалансированное дерево.
- •Стек Занятие 1. Стек. Отличия стека от списка. Основные операции со стеком.
- •Занесение элемента в стек
- •Извлечение элемента из стека
- •Примеры решения задач.
- •Занятие 2. Самостоятельное решение задач
- •Занятие 3. Очереди. Основные операции над очередью.
- •Занесение элемента в очередь
- •Извлечение элемента из очереди
- •Примеры решения задач
- •Занятие 4. Самостоятельное решение задач
- •Занятие 5. Кольцо. Формирование кольца. Основные операции над кольцом.
- •Формирование кольца
- •Обход кольца
- •Занятие 6. Примеры решения задач с применением динамической структуры кольцо. Творческая работа.
- •Список Занятие 1. Список. Создание списка путем добавления элементов в конец списка. Просмотр списка.
- •Просмотр списка
- •Занятие 2. Создание списка путем вставления элементов в начало.
- •Занятие 3. Упорядочивание списка. Вставление элемента в середину списка.
- •Занятие 4-5. Примеры задач, решаемых с помощью списка. Решение задач.
- •Занятие 6. Удаление элемента из списка.
- •Занятие 7. Зачет.
- •Динамические структуры данных Занятие I. Динамические структуры данных. Статические и динамические переменные. Адреса. Указатели и их объявление.
- •Указатели и их объявление
- •Занятие 2. Присвоение значений указателю. Оператор @ с переменной. Оператор @ с параметром процедуры, переданным по значению. Оператор @ с параметром процедуры, переданным по ссылке.
- •Занятие 3. Список. Создание списка путем добавления элементов в конец списка. Просмотр списка
- •Занятие 4. Создание списка путем вставления элементов в начало.
- •Занятие 5. Упорядочивание списка. Вставление элемента в середину списка.
- •Примеры задач, решаемых с помощью списка
- •Занятие 6. Удаление элемента из списка.
Занятие 3. Сортировка записей.
Рассмотрите решение задачи, наберите ее на компьютере, протестируйте, найдите в программе недостатки и устраните их. Дополните задачу комментариями и покажите учителю для оценки.
Задача 1. Во время лыжных соревнований в центральный судейский компьютер поступают данные в следующем виде: номер участника, его фамилия, страна и показанный результат. Составить программу, которая после ввода очередной информации выдает таблицу результатов участников в порядке ухудшения.
Program Ski;
Uses
Crt;
Type
inf= record
num: byte;
name,strana: string[30];
rez: real;
end;
Var
m: array [1..100] of inf;
i,j,k,l: integer;
Procedure Input;
Begin
write('Введите количество участников соревнований: ');
readln(k);
for i:=1 to k do
with m[i] do
begin
write('Введите номер участника: ');
readln(num);
write('Введите фамилию: ');
readln(name);
write('Какую страну представляет: ');
readln(strana);
write('Показанный результат: ');
readln(rez);
writeln;
end;
End;
Procedure Vich;
Var
o: real;
n,s:string;
nm: byte;
Begin
ClrScr;
for i:=1 to k-1 do
for j:=i+1 to k do
begin
if m[j].rez<m[i].rez
then
begin
o:=m[j].rez;{Меняем результаты}
m[j].rez:=m[i].rez;
m[i].rez:=o;
nm:=m[j].num;{Меняем номера}
m[j].num:=m[i].num;
m[i].num:=nm;
n:=m[j].name;{Меняем фамилии}
m[j].name:=m[i].name;
m[i].name:=n;
s:=m[j].strana; {Меняем страны}
m[j].strana:=m[i].strana;
m[i].strana:=s;
end;
end;
End;
Procedure Output;
Begin
for i:=1 to k do
with m[i] do
begin
writeln('',i,'-ое место занял:');
writeln('участник под номером: ',num);
writeln('Его фамилия: ',name);
writeln('Представляет страну : ',strana);
writeln('Показанный результат: ',rez:3:1);
writeln;
end;
End;
Begin
ClrScr;
Input;
Vich;
Output;
ReadKey;
End.
Задание. Дополните решенную Вами предыдущую задачу сортировкой по выбранному Вами полю записи и выводом отсортированного массива записей на экран. Сортировку осуществляйте с помощью одного из способов, выбранного учителем из предложенных:
- сортировка вставкой;
- сортировка выбором;
- сортировка методом простого обмена;
- сортировка с помощью рекурсии.
Задание. Выберите с учителем задачи для решения из предложенного списка. Для проверки учителем решения Вашей задачи приготовьте не только листинг и файл с протестированной задачей, но и 3-4 теста для демонстрации различных вариантов введения информации и вывода на экран.
1. Среди N абитуриентов, сдававших экзамены по информатике, математике и английскому языку, выбрать всех отличников и всех учащихся, набравших в сумме не меньше проходного балла. Данные о проходном балле вводятся с клавиатуры.
2. Среди N абитуриентов, сдававших экзамены по информатике, математике и английскому языку в перечисленном порядке, выбрать учащихся, не допущенных к сдаче следующего экзамена в связи с получением неудовлетворительной оценки по предыдущему экзамену. Выдать на экран список абитуриентов, удачно сдавших все экзамены.
3. Составить программу, выдающую справку о номере квартиры, в которой проживает жилец. В доме имеется N квартир и проживает M человек. Пользователь вводит фамилию жильца. Если в доме поживает несколько жильцов с такой фамилией, то выдается сообщение о необходимости ввести инициалы. Если инициалы у нескольких жильцов совпадают, то необходимо ввести год рождения. Если с такими данными найдется один жилец (несколько), то вывести номер (номера) квартир, где он (они) проживают и все введенные о нем (них) сведения. Если жильца с такой фамилией нет, то вывести сообщение об этом.
4. Составить программу, которая анализировала бы введенную информацию о пользователях городской телефонной сети и выдавала бы список абонентов, имеющих задолженность за месяц, а также считала пеню (вводится пользователем). Запись должна иметь поля:
- месяц анализа данных;
- фамилию, имя, отчество;
- номер телефона;
- адрес;
- имеющиеся льготы по оплате;
- абонентская плата;
- стоимость междугородних разговоров;
- стоимость дополнительных платных услуг.
По введенной информации и запросу пользователя предусмотреть в программе вывод предупреждения абонентов, имеющих задолженность.
5. Составить программу, собирающую данные об авиакомпаниях и выдающую справку туристу до запрашиваемого места. Справка должна содержать:
- название авиакомпании;
- название рейса;
- номер рейса;
- тип самолета;
- даты вылета (содержатся в массиве);
- наличие мест в 1 и 2 классах;
- стоимость перелета.
В случае покупки билета, массив записей должен быть соответственно измениться.
6. Во время лыжных соревнований в центральный судейский компьютер поступают данные в следующем виде: номер участника, его фамилия, страна и показанный результат. Составить алгоритм, который после ввода очередной информации выдает таблицу результатов участников в порядке ухудшения.
7. В экзаменационной ведомости фиксируются фамилии учеников, номера билетов, оценки, записанной прописью. Составьте подобную ведомость для группы из N человек на основе сформированного массива записей. Строка списка имеет следующий вид:
Иванов Александр билет № 12 (отлично)
Вывести информацию о результатах экзамена в следующем виде:
Количество экзаменуемых – 25
Сдали на "отлично" – 7
Сдали на "хорошо" – 10
Сдали на "удовлетворительно" – 7
Сдали на "неудовлетворительно" – 1
Не явились – нет
8. По окончании школы ученики сдавали экзамены по литературе, математике, физике и информатике. Определите экзамен, на котором ученики получили наиболее высокий средний бал и выведите список учащихся в порядке убывания результатов по этому экзамену.
9. Составить программу, организующую заполнение массива записями, содержащими информацию о здоровье детей в лагере отдыха. Запись должна содержать поля:
- фамилия, имя ребенка;
- дата прибытия в лагерь;
- вес ребенка (на день прибытия, через 10 дней, через 20 дней);
- рост ребенка;
- возраст;
- номер отряда;
- наличие хронических заболеваний.
Вывести данные о детях, увеличивающих свой вес и о детях, которые худеют.
10. Познакомившись с содержанием предыдущих задач придумайте свою интересную задачу и решите ее.