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

Цель работы:Освоение правилсоставленияпрограмм циклическойструктуры спараметром.

Задание№ 17. Вычислитьзначение функции

,по указанномуграфику длязначений аргумента

лок-схема.

Программана TurboPascal

{****************************************************************}

{Программа:lab6,Лаб. раб. №6, Вар.17 }

{Цель:вычислениезначения ф-цииf(x)с помощью операторас параметром}

{оператораи правил программированияразветвляющихсяалгоритмов. }

{Описаниепараметрови переменных: }

{x–переменнаяцикла, y-значение функции,i –параметр цикла }

{Требуемыеподпрограммы:нет. }

{Программист:Позднышев А.А.,гр. 316 }

{Проверил:Баринов В.В.,каф. ВПМ }

{Датанаписания: 28февраля 2004 г. }

{*****************************************************************}

program lab6;

var i:integer;

x,y:real;

begin

x:=-3;

fori:=1 to 12 do

begin

if x

if x>1then y:=ln(x);

if(x>=0)and (x

writeln('y=',y);

x:=x+0.5;

end;

end.

Результатывычисленияпрограммы:

y=-1.7320508076E+00

y=-1.4433756730E+00

y=-1.1547005384E+00

y=-8.6602540379E-01

y=-5.7735026919E-01

y=-2.8867513460E-01

y=0.0000000000E+00

y=4.0546510811E-01

y=6.9314718056E-01

y=9.1629073188E-01

МинистерствообразованияРФ

Рязанскаягосударственнаярадиотехническаяакадемия

Кафедра ВПМ

Отчет о

лабораторнойработе № 6:

«Проектированиепрограмм циклическойструктуры

с известнымчислом повторений»

Выполнил: ст. гр. 316

ПозднышевА.А.

Проверил:Баринов В.В.

Рязань 2004