- •Министерство образования Российской Федерации Ярославский государственный педагогический университет имени к.Д. Ушинского Лабораторный практикум по языку программирования 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
- •Примерный список индивидуальных задач
Задание 5
Составьте программу для решения одной из предложенных задач:
Даны целые числа f1, f2, f3, ..., f10, являющиеся коэффициентами многочлена z(x). Исследовать существование целочисленных корней уравнения z(x)=0.
Даны действительные числа a0,...,an,b0,b1,...,bn (a0,...,an попарно раличны). Требуется найти многочлен F(x) степени не выше n, такой, что F(ai)=bi (i=0,1,2, ..., n).
Найдите наибольший общий делитель многочленов f(x), g(x):
а) f(x)=(1, 3, -1, -4, -3), g(x)=(3, 10, 2, -3).
б) f(x)=(1, 1, -3, -4, -1), g(x)=(1, 1, -1, -1).
в) f(x)=(1, 2, -4, -3, 8, -5), g(x)=(1, 1, -1, 1).
г) f(x)=(1, 1, 2, 1, 1), g(x)=(1, -2, 1, -2).
д) f(x)=(1, 2, 2, 2, 2), g(x)=(1, 0, 3, 2).
е) f(x)=(1, 6, 17, 24, 12), g(x)=(1, -2, -13, -10).
ж) f(x)=(1, 1, 3, 4, 4, 2), g(x)=(1, 2, 3, 6, 6, 2).
з) f(x)=(1, 6, 2, 3, 6, 1), g(x)=(1, 6, 4, 4, 6).
Найдите наименьшее общее кратное многочленов f(x), g(x):
а) f(x)=(2, 0, 1, -3), g(x)=(1, 1, -2).
б) f(x)=(1, -2, 1, 7, -12, 10), g(x)=(3, -6, 5, 2, -2).
в) f(x)=(1, 0, -10, 0, 1), g(x)=(1, -4, 2, 6, 4, 2, 1).
Даны действительные числа a0, ..., a5, многочлен P(x) шестой степени.
Получить действительные числа d0, ..., d6 такие, что
P(x)=d0+d1(x-a0)+d2(x-a0)(x-a1)+...+d6(x-a0)(x-a1)...(x-a5).
Лабораторная работа №14Линейная комбинация векторов
Цель работы: Овладеть навыками составления алгоритмов решения геометрических задач по теме "Линейные операции над векторами", используя заданный набор процедур.
Файл LIST.1 содержит заголовок программы, функции det2, det3 и следующие процедуры: input, output, sum, subtract, multiply, system2, system3.
Порядок решения задачи
1. Внимательно проанализируйте условие задачи и определите, какими процедурами и функциями из файла LIST.1 Вы воспользуетесь для данной задачи.
2. Допишите основную программу.
3. Исполните программу. Проанализируйте ответ, результат покажите преподавателю.
Пример решения задачи
Задача : Найти сумму k векторов размерности n.
Анализ : для решения данной задачи воспользуемся процедурами input,output,sum.
Основная программа имеет вид :
begin
write('Введите размерность вектора ');
readln(n); write('Введите число векторов ');readln(k);
{------ Первоначальное обнуление вектора суммы b --------}
for i:=1 to n do s[i]:=0;
{--- Ввод координат очередного вектора и добавление его к вектору суммы ---}
for i:=1 to k do
begin
writeln('Введите координаты ',i,'-того вектора ');
input(n,a); sum(n,a,s,s); end;
writeln('Координаты вектора суммы ');output(n,s);
end.
Задания к лабораторной работе
Задание 1
Исполните программу вычисления суммы k векторов.
Задание 2
Переделайте предыдущую программу так, чтобы вычислялась линейная комбинация k векторов.
Задание 3
Составьте программу, определяющую:
3.1. коллинеарны ли два вектора плоскости;
3.2. компланарны ли три вектора.
Задание 4
Составьте программу, определяющую составляющую q вектора p на вектор a при косом проектировании в направлении вектора b
Задание 5
Составьте программу для решения одной из следующих задач:
Найти составляющую q вектора p на плоскость, определяемую векторами a и b, при косом проектировании в направлении вектора c (в случае компланарности ввод векторов a,b,c повторяется).
Произвольная пирамида SABCD, в основании которой лежит параллелограмм ABCD, задана векторами SA=a, SB=b, SC=c. Вычислить вектор MN, где M - середина ребра SD, N - центроид треугольника SAC.
Произвольная пирамида SABCD, в основании которой лежит трапеция ABCD (CD=L*BA), задана векторами SA=a, SB=b, SC=c. Вычислить вектор MN, где M - середина ребра SD, N - центроид треугольника SAC.
Наклонная треугольная призма ABCA1B1C1 построена на векторах AB=a, AС=b,AA1=c. Найдите вектор МN,если М - центр параллелограмма BCC1B1, а N - центроид треугольника A1B1C1.
Параллелепипед ABCDA1B1C1D1 построен на векторах AB=a,AD=b,AA1=c. Найдите вектор МN,если М – середина ребра CC1,а N - центроид треугольника CB1D1.
Усеченная четырехугольная пирамида ABCDA1B1C1D1, в основании которой лежит параллелограмм A1B1C1D1,a отношение сходственных ребер равно L, задана векторами AB=a, AD=b, AA1=c. Найдите вектор МN, если М - середина ребра CC1, а N - центроид треугольника АB1D1.
Усеченная четырехугольная пирамида ABCDA1B1C1D1, в основании которой лежит трапеция A1B1C1D1 (А1B1 = L*D1C1), a отношение сходственных ребер равно K, задана векторами AB=a, AD=b, AA1=c. Найдите вектор МN, если М-середина ребра CC1, а N - центроид треугольника АB1D1.
Трапеции ABCD и AB1C1D1, расположенные в различных плоскостях, имеют общую вершину А и равные отношения оснований (AD/BC = AD1/B1C1 = L).Проверьте, что отрезки BB1, CC1, DD1 параллельны некоторой плоскости (Примем АB1=a, AB=b, AD=c, AD1=d).
На сторонах AB,BC,CD,DA косого четырехугольника ABCD, не обязательно лежащего в одной плоскости, взяты точки А1, B1, C1, D1 соответственно так, что AA1=AB/2, BB1=BC*2/3, CC1=CD*3/4, DD1=DA/7. Проверьте, что векторы A1B1, B1C1, C1D1 компланарны. Предполагается, что заданы векторы AB=a, AC=b, AD=c.