Программирование линейных вычислительных процессов с использованием операторов, реализующих базовые структуры следования. Вариант № 1

Лабораторная работа №2

Тема - программирование линейных вычислительных процессов с использованием операторов, реализующих базовые структуры следования.

Цель работы – освоить на практике программирование линейных вычислительных процессов используя для этого простейшие операторы ввода-вывода и присваивания, изучить построение и использование арифметических выражений, научиться отладке программ и подготовке с этой целью.

Выполнил студент группы ТО-07

Магомедов Гаджи Сиражудинович

Проверил доц. Каф ИКТ Журов Г.Н.

Дата 11.02.08.

Задача 1.

Составить программу для вычисления у при заданном значении t=0.9 по формуле

Напечатать t, , b,

Решение:

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

c= , .

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

t=0.9

c=0.9+1/0.9=0.9+1.1111=2.0111

s=2.2479

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

t=0.9

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

 

5. Программа:

Program PR1;   {Программирование нелинейного

               вичислительного процесса}

Var t,c,s,b:real;    {описание переменных}

Begin                 {Начало основного блока}

WriteLn('Введите значение t');

ReadLn(t);        {Ввод t}

c:=t+(1/t);         {Вычисление с}

s:=exp(t*t);        {Вычисление s}

b:=c/s+(c-1)*s; {Вычислениe b}

WriteLn;

WriteLn('t=',t:6:5,'t+1/t',c:9:4,' exp(t*t)=',s:7:4,' b=',b:8:4);

{Печать значений t,t+1/t,exp(t*t),b}

End. {Конец программы}

6. Вид печати:

t=0.9 t+1/t=2.0111 exp(t*t)= 2.2479 b=  3.1675

Задача 2.

Составить программу для вычисления у при заданных

значениях  и  по формуле .

Напечатать

Решение.

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

, ,

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

x=0,8, t=0,9, y=1,57.

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

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

 

5. Программа:

Program Pr2;

Var a,b,x,t,y:real;

Begin

ReadLn(x,a);

t:= arctan(x/sqrt(1-x*x))*arctan(x/sqrt(1-x*x));

b:=((x*x+1)/ABS(x*x+1))*exp(ln(ABS(x*x+1)/a));

y:=t/b;

WriteLn;

WriteLn('x=',x:3:1,' t=',t:4:1,' y=',y:8:6);

End.

6.Вид печати:

x=0.8 t= 0.9 y=1.572945

Задача 3.

Составить программу вычисления и печати при х=0,7 значений y и z по формулам .

Округлить значения y и z до ближайших целых значений. Найти частное от деления и остаток от деления округленного значения y на округленное значение z. Напечатать эти значения.