Федеральное государственное бюджетное образовательное учреждение

высшего профессионального образования

Самарский государственный Аэрокосмический университет

имени академика С.П.Королёва

(национальный исследовательский университет)

Отчет по лабораторным работам

по информатике

Выполнила: Сидоренкова Ксения,

студентка группы №7104

факультета экономики и управления СГАУ,

специальность — менеджмент

Проверила: Савченко О.Г.

Оценка: ___________________________

Самара, 2011

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

Задание:

a=2,44; b=1,39; c=6,21; x=3,10.

Решение: 1. Блок-схема алгоритма приведена на рисунке.

2. Текст программы:

program lab1;

var a,b,c,x,y:real;

begin

a:=2.44;b:=1.39;c:=6.21;

write('vvedi x=');

readln(x);

y:=sqrt(x+exp(a*x))*ln((b*x*x-1)/(c*x*x+3));

writeln('x=',x:7:2,' y=',y:8:3);

readln;

end.

3. Результат выполнения контрольного примера:

vvedi x=3.10

x=3.10 y= -71.345

2

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

Задание: если известно, что a=1,57; b=2,38

1) при x=-0,1; 2)при x=-4,25

Решение: 1. Блок-схема алгоритма приведена на рисунке

2. Текст программы:

Program lab2;

var a,b,x,y:real;

begin

a:=1.57;b:=2.38;

write('vvedi x=');

readln(x);

if x<-1 then y:=sqrt(abs(sin(a*x)))

else y:=ln(sqrt(1+(b*x)*(b*x)));

writeln('pri x=',x:5:2,'znachenie y=',y:5:2);

readln;

end.

3

3. Результат выполнения контрольного примера:

vvedi x=-4.25

pri x=-4.25 znachenie y= 0.62

vvedi x=-0.1

pri x=-0.10 znachenie y= 0.03

Задание 2:

При a=2,7; b=1,5 и значениях X 1) X=-4,5; 2) X=-0,33; 3)X=2,53

Решение: 1. Блок-схема программы с вложенным ветвлением

2. Текст программы:

program lab21;

var a,b,x,y:real;

begin

a:=2.7;b:=1.5;

write('vvedi x=');

readln(x);

if x<=-1 then y:=1/((1+x)*(1+x))

else if x>1 then y:=(x*x)+cos(a)

else y:=sin((a*x)+b);

4

writeln('pri x=',x:5:2,'znachenie y=',y:5:2);

readln;

end.

3. Результат выполнения контрольного примера

pri x=-4.50 znachenie y= 0.08

pri x=-0.33 znachenie y= 0.57

pri x= 2.53 znachenie y= 5.50

Задание 3:

При a=2,7; b=1,5 и значениях X 1) X=-2; 2) X=1; 3)X=2; 4)X=3

Решение: 1. Текст программы:

program lab23;

var a,b,y:real;

x:integer;

begin

a:=2.7;b:=1.5;

write('vvedi x=');

readln(x);

case x of

-2:y:=1/((1+x)*(1+x));

2:y:=(x*x)+cos(a);

1:y:=sin((a*x)+b);

else begin writeln('znachenie x zadano neverno');

writeln('nazhmi enter');

readln;

exit;

end;

end;

write('pri x=',x,'znachenie y=',y:5:2);

readln;

end.

2. Блок-схема алгоритма с оператором выбора:

5

3. Результат выполнения контрольного примера

pri x=-2 znachenie y= 1.00

pri x=1 znachenie y=-0.87

pri x=2 znachenie y= 3.10

vvedi x=3

znachenie x zadano neverno

nazhmi enter

6

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

Задание:

От значения xn=4 до значения xk=7 с шагом dx=0,3 и a=3,8

Решение: Блок-схемы алгоритмов вычислений и тексты программ с использованием операторов цикла while, repeat, for приведены ниже.

1) While

2 . Текст программы:

program lab3;

var x,y,xn,xk,dx,a:real;

begin

write('vvedi xn ,xk ,dx ,a ');

readln(xn,xk,dx,a);

x:=xn;

writeln(' Tablitca');

writeln('┌─────┬─────┐ ');

writeln('| X | Y |');

while (x>xn) and (x<=xk) do

begin

7

y:=(1-exp(-a*x))*ln((a*sqr(x)-1)/(a*sqr(x)+2));

x:=x+dx;

writeln('├─────┼─────┤ ');

writeln('|',x:5:2,'|',y:5:2,'|');

writeln('└─────┴─────┘ ');

end;

readln;

end.

2) Repeat

2. Текст программы:

program lab31;

var x,y,xn,xk,dx,a:real;

begin

write('vvedi xn ,xk , dx ,a ');

readln(xn,xk,dx,a);

8

x:=xn;

writeln(' Tablitca');

writeln('┌─────┬─────┐');

writeln('| X | Y |');

repeat

y:=(1-exp(-a*x))*ln((a*sqr(x)-1)/(a*sqr(x)+2));

writeln('├─────┼─────┤');

writeln('| ',x:4:2,' є ',y:4:2,' |');

x:=x+dx;

until x>xk+dx;

writeln('└─────┴─────┘');

readln;

end.