Программирование линейных вычислительных процессов, страница 2

1. Составить расчётные формулы для использования их в программе, вводя при необходимости обозначение промежуточных результатов.
2. Подготовить необходимое количество тестов для проверки программы.
3. Подготовить значения исходных данных для каждого теста.
4. Представить алгоритм решения задачи в виде блок-схемы.
5. Составить программу, согласуя её с блок-схемой.
6. Используя среду программирования Turbo Pascal,ввести программу в компьютер и сохранить в личном каталоге.
7. Отладить программу, используя подготовленные тесты.

Задача 1.

Составить программу для вычисления и печати указанных величин при заданных значениях исходных величин, причём каждое подвыражение должно вычисляться по одному разу. Напечатать значения. Условие:

Решение.

1. Расчётные формулы:

   2. Тесты для проверки программы:

   3. Исходные данные: x=1.5

   4. Блок-схема:

   5. Приведен текст программы:

a=ln(x)

Program lab3_1;

b=ln²(x)

var x,y,a,b:real;

Begin

   writeln('x=');

   readln(x);

y=2*x/1000(1+a+b)

   a:=ln(x);

   b:=sqr(ln(x));

   y:=(2*x/1000)*(1+a+b);

   writeln('ln(x)=',a:4:6);

   writeln('y=',y:4:6);

End.

6.Результаты работы программы:

x=

1.5

ln(x)=0.405465

y=0.004710

8. Проверка в Excel:

Проверка задачи 1
a=	0,405465
b=	0,164402
x=	1,5
y=	0,00471

Проверка задачи 1
a=	=LN(B4)
b=	=СТЕПЕНЬ(B2;2)
x=	1,5
y=	=2*10^(-3)*B4*(1+B2+B3)