- •Министерство образования Российской Федерации Ярославский государственный педагогический университет имени к.Д. Ушинского Лабораторный практикум по языку программирования Pascal Ярославль 2004
- •Оглавление
- •Лабораторные работы Лабораторная работа №1Знакомство с клавиатурой. Организация работы в среде Турбопаскаль.
- •Задание 1
- •Задание 2
- •Задание 3
- •Задание 4
- •Задание 5
- •Лабораторная работа №2Команды присваивания, ввода и вывода. Составление простейших программ на языке Турбопаскаль.
- •Задание 1
- •Задание 2
- •Задание 3
- •Задание 4
- •Задание 5
- •Лабораторная работа №3Команды ветвления и выбора на языке Турбопаскаль
- •Задание 1
- •Задание 2
- •Задание 3
- •Задание 4
- •Задание 5
- •Лабораторная работа №4Команды ветвления и повторения на языке Паскаль
- •Задание 1
- •Задание 2
- •Задание 3
- •Задание 3
- •Задание 4
- •Задание 5
- •Лабораторная работа №6Циклы
- •Задание 1
- •Задание 2
- •Задание 3
- •Задание 4
- •Задание 5
- •Дополнительные задания
- •Лабораторная работа №7Одномерные массивы
- •Задание 1
- •Задание 2
- •Задание 3
- •Задание 4
- •Задание 5
- •Дополнительные задачи.
- •Лабораторная работа №8Двумерные массивы
- •Задание 1
- •Задание 2
- •Задание 3
- •Задание 4
- •Задание 5
- •Дополнительные задачи.
- •Лабораторная работа №9Работа со строковыми величинами
- •Задание 1
- •Задание 2
- •Задание 3
- •Задание 4
- •Задание 5
- •Дополнительные задания
- •Лабораторная работа №10Обработка литерных величин на языке Турбопаскаль
- •Дополнительные задания
- •Задание 5
- •Лабораторная работа №12Работа с одномерными и двумерными массивами
- •Задание 1
- •Задание 2
- •Лабораторная работа №13Многочлены
- •Задание 1
- •Задание 2
- •Задание 3
- •Задание 4
- •Задание 5
- •Лабораторная работа №14Линейная комбинация векторов
- •Задание 1
- •Задания повышенной трудности
- •Лабораторная работа №15Скалярное произведение векторов.
- •Лабораторная работа №16 Простейшие графические операторы
- •Задание 5
- •Задание 6
- •Дополнительные задания.
- •Лабораторная работа n 19 Работа с множествами Задание 1
- •Задание 2-3
- •Задание 4
- •Задание 5
- •Лабораторная работа № 20 Работа с записями
- •Дополнительные залания
- •Задание 3
- •Задание 5
- •Задание 6 (дополнительный балл)
- •Дополнительное задание (до 3 баллов)
- •Задание 5
- •Примерные вопросы к собеседованиям Величина. Команды присваивания, ветвления и выбора.
- •Массивы
- •Литерные переменные
- •Процедуры и функции
- •Графика
- •Датчик случайных величин
- •Множества
- •Динамическая память
- •Деревья
- •Тексты программ для выполнения лабораторных работ Файл primer1.Pas
- •Файл lab10.Pas
- •Файл lab11.Pas
- •Файл List1.Pas
- •Файл List2.Pas
- •Файл lab5.Pas
- •Файл lab6.Pas
- •Примерный список индивидуальных задач
Задание 2
Составьте программу для решения одной из следующих задач. Программу запишите на диск под своей фамилией.
Решить невырожденное (т.е. а0) биквадратное уравнение ax4+bx2+c=0.
Решить невырожденное (т.е. а0) квадратное неравенство ax2+bx+c>0.
Дано натуральное число (n100), определяющее возраст человека (в годах). Дать для этого числа наименования ”год", ”года", ”лет".
Дано время (часы, минуты, секунды)-три натуральных числа. Определить время через 10 секунд.
Определить дату следующего дня. Например:
31.12.1985
01.01.1986
29.04.1985
30.04.1985
Определить, каким днем недели является дата, заданная в виде число, месяц (в текущем году).
Определить число полных лет на текущий момент по введенной с клавиатуры дате.
По введенной дате рождения определить, является ли на сегодняшний день совершеннолетним пользователь программы.
Даны целые числа m, n (0<m12, 0n<60), указывающие момент времени: ” m часов, n минут". Определить наименьшее время (число полных минут), которое должно пройти до того момента, когда часовая и минутная стрелки на циферблате:
1)совпадут;
2)расположатся перпендикулярно друг другу.
Определить число полных лет, месяцев и дней на текущий момент по введенной с клавиатуры дате.
Задание 3
Составьте программу, которая рисует во всю высоту экрана один из ваших инициалов, используя введенный символ (букву согласуйте с преподавателем).
Задание 4
Вызовите с диска программу, составленную Вами в задании 2, и добавьте в нее защиту от ввода некорректных данных, т.е. при вводе данных организуйте цикл до тех пор, пока не будут выполнены ограничения, накладываемые на значения аргументов.
Лабораторная работа №5Циклические вычисления
Цель работы: Ознакомиться с командой повторения, научиться составлять программы с использованием команды повторения.
Замечание: перед работой должна быть выполнена контролирующая программа по теме "Команда повторения WHILE".
Задание 1
Составьте программу для решения одной из следующих задач.
Вычислить n!.
Вычислить произведение (a-n)(a-2n)...(a-kn).
Вычислить
Вычислить сумму квадратов чисел от 1 до n.
Вычислить (2n+1)!!.
Вычислить (2n)!!
Задание 2
Составьте программу для решения одной из следующих задач.
Предприниматель, начав дело, взял кредит размером k рублей под p процентов годовых и вложив его в свое дело. По прогнозам его дело должно давать прибыль r рублей в год. Сможет ли он накопить сумму, достаточную для погашения кредита, и если да, то через сколько лет?
В парикмахерскую с одним мастером посетители приходят с интервалом t минут, а продолжительность обслуживания каждого посетителя p минут. Сколько клиентов обслужит мастер за смену продолжительностью Т минут?
Известно время начала и окончания работы некоторого пригородного автобусного маршрута с одним автобусом на линии, а также протяженность маршрута в минутах (в один конец) и время отдыха на конечных остановках. Составить суточное расписание этого маршрута (моменты отправления с конечных пунктов) без учета времени на обед и пересменку.
В учебном заведении задается начало учебного дня, продолжительность пары, продолжительность перерыва. Получить расписание звонков до седьмой пары.
Леспромхоз ведет заготовку древесины. Первоначальный объем ее на территории леспромхоза составлял P кубометров, а за год на территории леспромхоза вырастает Q кубометров новой древесины. Годовой план заготовки – R кубометров. Через сколько лет в бывшем лесу будут расти одни опята?
У гусей и кроликов вместе 2n лап. Сколько может быть гусей и кроликов (вывести все возможные сочетания)?