Порядок выполнения работы
End
Begin
Else
Begin
Begin
While M <> N Do
If M > N Then M := M - N Else N := N - M;
K := M
End;
Write('Введите числители и знаменатели дробей:');
ReadLn(A, B, C, D);
E := A * D - B * C;
F := B * D;
If E = 0 Then WriteLn(E)
Nod(Abs(E), F, G);
E := E Div G;
F := F Div G;
WriteLn('Ответ: ', E, '/', F)
End.
4. Результаты расчетов.
Введите числители и знаменатели дробей:
Ответ: -2/35
1. Изучите теоретический материал.
2. Разработайте алгоритмы указанных задач.
3. Запишите разработанные алгоритмы на языке программирования Pascal.
4. Отладьте программы в интегрированной среде разработки Pascal.
5. Оформите отчет о проделанной работе.
6. Ответьте на контрольные вопросы.
задания
1. Напишите программу, состоящую из трех процедур и основной программы. Первая процедура организует ввод двух целых чисел X и Y, вторая проверяет их сумму, третья выводит результат. Используйте эти процедуры в основной программе. Используйте X и Y как глобальные переменные.
2. Для заданного х составить алгоритм вычисления значения выражения:
В программе использовать процедуру.
Форма отчёта: Отчет выполняется в тетрадях по практическим работам в письменном виде. Программа отлаживается в IDE Borland Pascal и в виде файлов копируется на сетевой диск.
Содержание отчета:
1. Тема работы.
2. Цель работы.
По каждому из заданий:
3. Условие задачи.
4. Постановка задачи.
5. Тестовые примеры.
Система оценки:двухбалльная.
Контрольные вопросы
1. Для чего нужны подпрограммы?
2. Существуют ли подпрограммы без параметра?
3. Какие параметры называются фактическими?
4. Каково соответствие между фактическими и формальными параметрами?
5. Как осуществляется вызов процедуры?
Список использованной литературы
1. Голицина О.Л., Попов И.И. Основы алгоритмизации и программирования: Учебное пособие. - М.: Форум: Инфра-М, 2002.
2. Программирование на языке Паскаль: задачник / под ред. Усковой О.Ф. – СПб.: Питер, 2005.