Ветвлящиеся процессы

ГУАП 
 

КАФЕДРА № 42 
 
 
 
 
 

ОТЧЕТ

ЗАЩИЩЕН С ОЦЕНКОЙ

ПРЕПОДОВАТЕЛЬ 

_________________________   _________________________ _________________________ 
 
 
 
 
 

ОТЧЕТ О  ЛАБАРАТОРНОЙ РАБОТЕ 
 

ВЕТВЛЯЩИЕСЯ ПРОЦЕССЫ 
 

             по курсу: 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

РАБОТУ ВЫПОЛНИЛ

СТУДЕНТ ГР.               1051          

Санкт-Петербург

2010 год

1. Цель работы

Изучить основы программы для программирования «Pascal»

Построить логическую блок схему.

Построить схему-программу  на языке «Pascal» 

2. Задание

X=S²+min {min (A, B), cos (B+C), sin (c)} 

3. Блок схема

 

4. Программа

var a,b,c,s,x,y,min,min1:real

begin

write ('vvedite a');

readln (a);

write ('vvedite b');

readln (b);

write ('vvedite c');

readln (c);

write ('vvedite s');

readln (s); 

if a>b then

min1:=b

else

min1:=a;

if min1<cos(b+c) then

if min1<sin(c) then

min:=min1

else

min:=sin(c)

else

if cos(b+c)<sin(c) then

min:=cos(b+c)

else

min:=sin(c);

y:=s*s;

x:=y+min;

write ('x=', x:7:3);

end.

5. Полученные результаты

А=-3

В=-2

S=2

C=5

Ответ: Х=1

6. Вывод

При подготовке к выполнению лабораторной работы были изучены основы программы «Pascal», изучена техника составления блок схем. Была написана программа, для решения уравнения.