Лабораторная работа №5.
Тема Линейные и ветвящиеся процессы
Цель Изучить и уметь использовать в программах:
- переменные и константы стандартных типов данных: integer, real, boolean, а также константы типов char и string;
- метки (label);
- выражения, комментарии, операнды, операции и их приоритетность.
- операторы: присваивания, пустой, составной, перехода, выбора;
- стандартные математические функции: sin, abs, arctan, cos, exp, ln, sqr, sqrt;
- стандартные процедуры ввода и вывода.
Задание Разработать программу, которая в ответ на вводимую с клавиатуры пару вещественных чисел, представляющих собой координаты X,Y точки A на плоскости, выдает текстовое сообщение о принадлежности этой точки заданной области. Например:"Точка принадлежит заданной области".
В программе должно быть предусмотрено неограниченное повторение всех операций с использованием оператора goto. Решение о повторе должен принимать пользователь с помощью клавиатуры.
Данные:
Вариант 5
Выполнение лабораторной работы №5.
Алгоритм решения задачи.
Текст программы.
Program N5;
Var x,y:real;
dalshe:integer;
Label start;
Begin
start:
Writeln('Введите значение координаты X');
Read(x);
Writeln(' Введите значение координаты Y');
Read(y);
If(
(
( (sqr(x+7.716)+sqr(y+10)) <=900 ) and
( y<=0 ) and
( x<=0 )
)
or
(
( (sqr((x-13.032)/23)+sqr((y-2)/38))<=1 ) and
( (sqr(x+7.716)+sqr(y+10)) >=900 ) and
( y<=0 ) and
( x>=0 ) and
( y<=-0.72*x+14.81 )
)
)
then Writeln('Точка принадлежит заданной области')
else Writeln(' Точка не принадлежит заданной области ');
Writeln('Повторить ? (1/0)');
Read(dalshe);
If (dalshe=1)
then goto start;
Работа программы.
Лабораторная работа №6.
Тема. Операторы повторения (циклы). Итеративные методы вычислений.
Задание. Разработать программу вычисления заданной площади, используя три различных метода вычислений: прямоугольников, трапеций, Симпсона. Результат вывести на экран в виде таблицы:
---------------------------------------------------------------------------
| Число разбиений | Результат |
| |----------------------------------------------- |
| n | A | B | C |
| -------------------------|------------------------------------------------|
| n1 | A1 | B1 | C1 |
| n2 | A2 | B2 | C2 |
| n3 | A3 | B3 | C3 |
---------------------------------------------------------------------------
Здесь: А1-А3, В1-В3, С1-С3 – численные результаты счета, полученные соответственно методами прямоугольников (А), трапеций (В) и Симпсона (С). Число разбиений n1, n2, n3 задать самостоятельно (например, n1=10, n2=100, n3=1000). Формат вывода результатов A, B, C задан в варианте.
Результат в виде таблицы должен выдаваться, не выходя из основной программы, т.е. по нажатию заданной клавиши должно быть предусмотрено продолжение работы программы с новым набором входных данных (использовать оператор цикла).
Промежуточные вычисления необходимых точек осуществить методом сканирования или методом проб с заданной точностью Е=0,0001.
Для реализации алгоритмов вычисления площади разработать соответствующие функции (процедуры).