Используя оператор условия, составить программу для вычисления составной функции

@Ильдар211290 · Регистрация: 31.03.2012

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

Используя, оператор условия (if … then), составить программу для вычисления составной (сложной) функции, имеющей различный вид на разных участках аргумента.
Все исходные данные, необходимые для проведения вычислений, вводить с клавиатуры.
Функция
y₁ = (–x)³ + sin(x);
y₂ = (x² + e^x) – 1;
y₃ = 13 – ln(x)*4;
y₄ = 8 + 10*sin(x – 3) ;
Участки аргумента :
–1 <= x₁ < –0.05;
–0.05 <= x₂ < 2;
2 <= x₃ < 3;
3 <= x₄ <= 4;

@Own3D · 31.03.2012, 20:35

Сообщение от Ильдар211290

(–x)3

это степень или умножение?
и для 4х вариантов я бы использовал case. обязательно if..then?

@Ильдар211290 · 31.03.2012, 20:44 **[ТС]**

У меня тут два сообщения там вложен файл с заданием. Помоги плиз

@Own3D · 31.03.2012, 20:56

Сообщение от Ильдар211290

Используя, оператор условия (if … then), составить программу для вычисления составной (сложной) функции, имеющей различный вид на разных участках аргумента.
Все исходные данные, необходимые для проведения вычислений, вводить с клавиатуры.
Функция
y1 = (–x)3 + sin(x);
y2 = (x2 + ex) – 1;
y3 = 13 – ln(x)*4;
y4 = 8 + 10*sin(x – 3) ; Участки аргумента : –1 <= x1 < –0.05;
–0.05 <= x2 < 2;
2 <= x3 < 3;
3 <= x4 <= 4;

вот что получилось. маленько не уверен в правильности вот этой строчки

Pascal

1	y:=(sqr(x)+exp(x*ln(e)))-1;

, если что подправьте.

Pascal

uses crt;
const
   e=2.72;
var
   x,y:real;
begin
write('Input x: ');
readln(x);
if (x>=-1) and (x<-0.05) then
y:=sqr(-x)*-x+sin(x);
if (x>=-0.05) and (x<2) then
y:=(sqr(x)+exp(x*ln(e)))-1;
if (x>=2) and (x<3) then
y:=13-ln(x)*4;
if (x>=3) and (x<4) then
y:=8+10*sin(x-3);
writeln('y=',y:0:2);
end.

@Ильдар211290 · 31.03.2012, 21:11 **[ТС]**

Спасибо) а вторую можешь решить?) Там во вложении есть второе задание.

@Own3D · 31.03.2012, 21:56

вот 2я:

Pascal

uses crt;
var
   n,sum,code,count,i,ctr:integer;
   str:string;
begin
repeat
   clrscr;
   write('Input n: ');
   readln(str);
   val(str,n,code);
until (code=0) and (n>0);
i:=1;
while count<n do
   begin
   sum:=sum+(sqr(i)*i);
   inc(i,2);
   inc(count);
   end;
writeln('sum=',sum);
ctr:=sqr(n)*(2*sqr(n)-1);
writeln('Control=',ctr);
if sum=ctr then
writeln('Correct!') else
writeln('Error! Incorrect!');
end.

@Ильдар211290 0 / 0 / 0 Регистрация: 31.03.2012 Сообщений: 9
		1
	Используя оператор условия, составить программу для вычисления составной функции 31.03.2012, 20:31. Показов 1345. Ответов 5 Метки нет (Все метки) Используя, оператор условия (if … then), составить программу для вычисления составной (сложной) функции, имеющей различный вид на разных участках аргумента. Все исходные данные, необходимые для проведения вычислений, вводить с клавиатуры. Функция y₁ = (–x)³ + sin(x); y₂ = (x² + e^x) – 1; y₃ = 13 – ln(x)4; y₄ = 8 + 10sin(x – 3) ; Участки аргумента : –1 <= x₁ < –0.05; –0.05 <= x₂ < 2; 2 <= x₃ < 3; 3 <= x₄ <= 4; 0

@Own3D 122 / 122 / 73 Регистрация: 29.10.2011 Сообщений: 308
	31.03.2012, 20:35	2
	Сообщение от Ильдар211290 (–x)3 это степень или умножение? и для 4х вариантов я бы использовал case. обязательно if..then? 0

@Ильдар211290 0 / 0 / 0 Регистрация: 31.03.2012 Сообщений: 9
	31.03.2012, 20:44 [ТС]	3
	У меня тут два сообщения там вложен файл с заданием. Помоги плиз 0

@Ильдар211290 0 / 0 / 0 Регистрация: 31.03.2012 Сообщений: 9
	31.03.2012, 21:11 [ТС]	5
	Спасибо) а вторую можешь решить?) Там во вложении есть второе задание. 0

Опции темы