Вычислить значения функции

@VBatoriss · Регистрация: 01.12.2014

Author24 — интернет-сервис помощи студентам

Задача: Для значений Х, изменяющихся от –2 до 2 с шагом 0,2 , вычислить значения функции Y:

$https://www.cyberforum.ru/cgi-bin/latex.cgi?Y=\begin{cases}<br /> e^x & \text{ , } 2 \ge x \gt -1 \\ <br /> ln(x) & \text{ , } 1 \ge x \gt 0 \\ <br /> sin(x)+x*cos(x) & \text{ , } 0 \ge x \ge -2 <br /> \end{cases}$

Полученные значения Y занести в массив. Вывести значения Х и соответствующие им значения элементов результирующего массива.

@Fakeoke · 01.12.2014, 17:15

Pascal

clrscr;
var i:integer; x:real; y:array [1..20] of real; {4 на 0.2 разделить 20 же будет?}
begin
x:=-2; 
while x<=2 do
begin
inc(i);
if (x>=-2) and (x<=0) then y[i]:=sin(x)+x*cos(x);
if (x>0) and (x<=1) then y[i]:=ln(x);
if (x>-1) and (x<=2) then y[i]:=exp(x);
writeln('Dlya x = ',x:0:2,' y= ',y[i]:0:3);
x:=x+0.2;
end;
readln;
end.

вроде должно работать, хз хз

@VBatoriss · 02.12.2014, 16:32 **[ТС]**

Спасибо!)

@VBatoriss 0 / 0 / 0 Регистрация: 01.12.2014 Сообщений: 3
		1
	Вычислить значения функции 01.12.2014, 12:06. Показов 1252. Ответов 2 Метки нет (Все метки) Задача: Для значений Х, изменяющихся от –2 до 2 с шагом 0,2 , вычислить значения функции Y: $https://www.cyberforum.ru/cgi-bin/latex.cgi?Y=\begin{cases}<br /> e^x & \text{ , } 2 \ge x \gt -1 \\ <br /> ln(x) & \text{ , } 1 \ge x \gt 0 \\ <br /> sin(x)+x*cos(x) & \text{ , } 0 \ge x \ge -2 <br /> \end{cases}$ Полученные значения Y занести в массив. Вывести значения Х и соответствующие им значения элементов результирующего массива. 0

@VBatoriss 0 / 0 / 0 Регистрация: 01.12.2014 Сообщений: 3
	02.12.2014, 16:32 [ТС]	3
	Спасибо!) 0

Опции темы

Вычислить значения функции

Решение