5.Контрольные вопросы
5.1 Что понимают под алгоритмом?
5.2 Какой алгоритм называется линейным?
5.3 Что такое система программирования?
5.4 Что понимается под термином TURBO-PASCAL?
5.5 Для чего выполняют компиляцию программы?
5.6 Как выполнить компиляция программы?
5.7 Какие ошибки могут быть обнаружены в программе?
5.8 Как исправить ошибки в тексте программы?
5.9 Какие основные блоки используются при составлении блок-схемы алгоритмы?
5.10 Каковы этапы решения задачи на ЭВМ?
5.11 Что понимается под стандартных вводом и стандартным выводом информации?
5.12 Каков формат оператора стандартного ввода информации?
5.13 Каков формат оператора стандартного вывода информации?
5.14 Какие форматы вывода информации вы знаете?
5.15 Как используются форматы вывода и для какой цели?
5.16 Какие функции модуля CRT наиболее часто используются в программах?
6. Пример выполнения работы
Задание:
Известны координаты двух точек на плоскости. Определить расстояние между этими точками.
Этап 1. Постановка задачи:
- Входной информацией является
координаты точки А - X1, Y1- вещ. числа,
координаты точки В - X2, Y2 – вещ. числа
- Выходной информацией является
Расстояние между двумя точками – DL – вещ. число
Этап 2.Формализация задачи
Этап 3. Блок-схема алгоритма на рис.3.
Рис.3. Блок-схема решения задачи
1 Способ решения задачи:
Этап 4.Текст программы без использования форматов вывода и модуля CRT
VAR X1,Y1,X2,Y2 : real; { объявление координат точек }
DL: real; { расстояние между точками }
Begin
Writeln(‘Введите координаты точки А -’);
Read(Х1, Y1);
Writeln(‘Введите координаты точки B -’);
Read(Х2, Y2);
DL:=sqrt(sqr(X2-X1)+sqr(Y2-Y1));
Writeln(‘Расстояние между точками - ’,DL);
End.
Этап 5.Контрольный пример – Вид экран представлен на рис. 4
Введите координаты точки А - 1 1
Введите координаты точки В - 2 2
Расстояние между точками - 1414213Е-6
Рис.4. Вид экрана с результатом решения задачи
2 Способ решения задачи
Этап 4. Текст программы с использования форматов вывода и модуля CRT
USES CRT;
VAR X1,Y1,X2,Y2 : real; { объявление координат точек }
DL: real; { расстояние между точками }
Begin
CLRSCR;
GOTOXY(10,5);
Write(‘*****************************************’);
GOTOXY(10,6);
Write(‘* Введите координаты точки А -’);
Read(Х1, Y1);
GOTOXY(45,6);
Write(‘*’);
GOTOXY(10,7);
Write(‘* Введите координаты точки B -’);
Read(Х2, Y2);
GOTOXY(45,7);
Write(‘*’);
GOTOXY(10,8);
Write(‘*****************************************’);
DL:=sqrt(sqr(X2-X1)+sqr(Y2-Y1));
GOTOXY(10,9);
Write(‘* Расстояние между точками - ’,DL:4:2);
GOTOXY(45,9);
Write(‘*’);
GOTOXY(10,10);
Write(‘*****************************************’);
End.
Этап 5. Контрольный пример (Вид экран представлен на рис. 5)
**************************************
* Введите координаты точки А - 1 1 *
* Введите координаты точки В - 2 2 *
**************************************
* Расстояние между точками - 1,41 *
**************************************
Рис.5. Вид экрана с результатом решения задачи