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

@марго82 · Регистрация: 30.12.2013

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

Пожалуйста, помогите сделать.

Разработать алгоритм и программу, имеющие структуру цикла с постусловием, и осуществить табулирование заданной функции при изменении аргумента х от начального значения х0 до хn с постоянным шагом hx, т.е. x=x0(hx)xn.

Дана сложная функция f(x)

(x/2)*(exp(1/3)*ln(1+x)) , если 1<= x<=3
f(x)=
(sin(2*x))/(2+cos(3*x)) , если x>3

При x<1 функция f(x) не определена

@Puporev · 30.12.2013, 07:17

Формулы точно списал у вас, хотя такое чувство что это
(x/2)*(exp(1/3)*ln(1+x))
у вас написано неверно

Pascal

uses crt;
var x0,xn,h,x,y:real;
begin
write('Введите начало интервала x0=');
read(x0);
repeat
write('Введите конец интервала xn>',x0:0:1,' xn=');
read(xn);
until xn>x0;
repeat
write('Введите шаг табуляции h<',xn-x0:0:1,' h=');
read(h);
until (h<xn-x0);
x:=x0;
repeat
if x<1 then writeln('x=',x:4:1,' f(x) не определено')
else
 begin
  if(x>=1)and(x<=3)then y:=(x/2)*exp(1/3)*ln(1+x)
  else if x>3 then y:=sin(2*x)/(2+cos(3*x));
  writeln('x=',x:4:1,' f(x)=',y:7:3);
 end;
x:=x+h;
until x>xn+h/2;
end.

@марго82 · 30.12.2013, 23:12 **[ТС]**

Спасибо Вам большое. Формулу я уточню, теперь есть от чего "плясать". Всё-таки плохо, когда не знаешь, да ещё и забудешь...

@марго82 0 / 0 / 0 Регистрация: 30.12.2013 Сообщений: 7
		1
	Использование цикла с постусловием для табулирования функций 30.12.2013, 03:44. Показов 1888. Ответов 2 Метки нет (Все метки) Пожалуйста, помогите сделать. Разработать алгоритм и программу, имеющие структуру цикла с постусловием, и осуществить табулирование заданной функции при изменении аргумента х от начального значения х0 до хn с постоянным шагом hx, т.е. x=x0(hx)xn. Дана сложная функция f(x) (x/2)(exp(1/3)ln(1+x)) , если 1<= x<=3 f(x)= (sin(2x))/(2+cos(3x)) , если x>3 При x<1 функция f(x) не определена 0

@марго82 0 / 0 / 0 Регистрация: 30.12.2013 Сообщений: 7
	30.12.2013, 23:12 [ТС]	3
	Спасибо Вам большое. Формулу я уточню, теперь есть от чего "плясать". Всё-таки плохо, когда не знаешь, да ещё и забудешь... 0

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

Решение