- •Департамент образования и науки
- •1. Этапы решения задач на эвм. Алгоритмизация. Блок-схемы.
- •2. Назначение системы программирования.
- •3.Связь функция - клавиатура в интегрированной среде Turbo Pascal
- •4. Команды экранного редактора
- •4.1 Команды перемещения курсора
- •4.2 Команды вставки/удаления
- •4.3 Команды работы с блоками
- •5. Технология компиляции
- •6. Технология отладки программы
- •7. Программирование линейных алгоритмов
- •Задание 1
- •8. Программирование разветвляющихся вычислительных процессов
- •Задание 2
- •9. Программирование циклов с параметром
- •Задание 3
- •10. Программирование циклов с условием
- •Задание 4
- •11. Работа с векторами
- •Задание 5
- •12. Работа с матрицами
- •Задание 6
- •13. Обработка символьных строк
- •Задание 7
- •14. Записи. Файлы.
- •Задание 8
- •15. Процедуры
- •Задание 9
- •16. Функции
- •Задание 10
6. Технология отладки программы
1 Трансляция программы должна выполняться с включенной опцией DEBUG INFORMATION (встроенный отладчик) меню OPTIONS -> COMPILER.
2 Для отладки программы выбрать меню RUN. Команда GOTO CURSOR (F4) позволяет выполнить программу до строки, где находится курсор.
Команда TRACE INTO (F7) -покомандное выполнение программы. Команда STEP OVER (F8) - пооператоpное выполнение программы. В отличие от TRACE INTO при обращении к процедуре или функции вход в них не производится, а они рассматриваются как один оператор.
3 Меню DEBUG позволяет выполнить следующие действия во вpемя отладки пpогpаммы:
Команда EVALUATE/MODIFY (Ctrl-F4) - позволяет вычислять и модифицировать значение пеpеменной и выpажения.
Команда Add Watch - добавить пеpеменную или выpажение в окно просмотра
Команда BREAKPOINT (Ctrl-F8) - установить (сбpосить) точку пpеpывания в стpоку исходного модуля, где установлен куpсоp. Пpи выполнении пpогpаммы по команде RUN по достижении отмеченной стpоки, TURBO пеpеходит в pежим отладки. Повтоpное нажатие Ctrl-F8 снимает точку пpеpывания.
4 Наблюдение за значением пеpеменных можно осуществить чеpез окно пpосмотpа WATCH, pезультаты пpогpаммы напpавляется в окно вывода OUTPUT. Окна можно активизиpовать с помощью команд WATCH и OUTPUT меню DEBUG.
7. Программирование линейных алгоритмов
Линейным называется алгоритм, в котором результат получается путем однократного выполнения заданной последовательности действий при любых значениях исходных данных. Согласно линейному алгоритму, прогон программы начинается с ее первого выполняемого оператора. Операторы будут задействованы последовательно, один за другим, в соответствии с их расположением в тексте программы.
Задание 1
Цель работы:
Изучить некоторые возможности интегрированной среды Turbo Pascal: редактирование исходного текста; компиляцию исходных модулей; запуск программ на исполнение; отладку программ.
Изучить структуру и правила записи программ на языке Turbo Pascal.
Приобрести начальные навыки работы в системе Turbo Pascal на примере программирования линейных алгоритмов.
ПРИМЕР:Найти сопротивление цели из двух последовательно
соединенных проводников.
program posledowatelnoe_soedinenie;
var r1,r2,r: integer;
begin
writeln('Вычисляется сопротивление R1+R2');
write('Сопротивление 1-го проводника R1 ? ');
readln(r1);
write('Сопротивление 2-го проводника R2 ? ');
readln(r2);
writeln('R1 =',r1:4,' R2 =',r2:4);
r:=r1+r2;
writeln('R =',r:4);
end.
ПОРЯДОК РАБОТЫ
1. Войти в среду Turbo Pascal.
2. Войти в среду редактора.
3. Выполнить работу по набору текста программы для задачи 1
(табл.1).
4. Сохранить файл на диске с желаемым именем.
5. Запустить компиляцию программы. Добиться успешной
компиляции.
6. Запустить программу на выполнение. Получить результаты.
7. Написать и выполнить программу для задачи 2. Вычислить
значение арифметического выражения (табл.2).
СОДЕРЖАНИЕ ОТЧЕТА
Отчет по лабораторной работе должен содержать условия, алгоритмы, тексты программ, исходные данные и результаты по двум задачам.
ТАБЛИЦА 1
НОМЕР ВАРИАНТА |
УСЛОВИЕ |
ИСХОДНЫЕ ДАННЫЕ |
1 |
Определить расстояние d между двумя точками на плоскости |
х1, у1, Х2, У2
|
2 |
Заданы 4 числа. Вычислить среднее арифметическое и среднее геометрическое модулей |
a, в, c, d
|
3 |
Найти радиус окружности, описанной вокруг треугольника по формуле: ,где р - полупериметр |
а, в, с
|
4 |
Найти радиус круга, вписанного в треугольник со сторонами а, в, с по формуле: ,где р - полупериметр |
а, в, с |
5 |
Определить площадь треугольника по трем углам и высоте: |
A, B, C, h
|
6 |
Определить площадь треугольника по заданной стороне и углам: |
A, B, C, a
|
7 |
Вычислить сопротивление цепи: |
R1, R2, R3 |
8 |
Вычислить сопротивление цепи:
|
R1, R2, R3
|
9 |
По двум сторонам и углу между ними в треугольнике АВС найти два остальных угла и третью сторону. |
A, B, a |
10 |
В магазине продается костюмная ткань. Ее цена А руб. за кв. метр. Подсчитать стоимость куска этой ткани длиной Х м и шириной У м. |
Х, У, А |
11 |
Найти площадь ромба по стороне и острому углу: ,где а - сторона ,a-угол |
а, a |
12 |
В арифметической прогрессии известны 1-й член и разность. Найти 30-й член этой прогрессии и сумму первых 40 членов. |
а1, d
|
13 |
Найти координаты центра отрезка, заданного координатами его концов. |
Х1, У1, Х2, У2 |
14
|
Найти сумму всех натуральных чисел от 1 до m используя формулу суммы членов арифметической прогрессии. |
|
ТАБЛИЦА 2
НОМЕР ВАРИАНТА |
УСЛОВИЕ |
ИСХОДНЫЕ ДАННЫЕ |
1 |
x, y | |
2 |
c, x, y | |
3 |
b, x, y | |
4 |
x, y, z | |
5 |
x, y, z | |
6 |
x, y, z
| |
7 |
x, y | |
8 |
x, y, z
| |
9 |
x, y, z
| |
10 |
x, y, z | |
11 |
x, y, z | |
12 |
x, y
| |
13 |
|
x, y
|
14 |
x, y
|