Составить программу табулирования функции

@Antihaos · Регистрация: 05.10.2014

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

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

Составить программу табулирования функции:

$https://www.cyberforum.ru/cgi-bin/latex.cgi?y=\begin{cases}\ln (|x-2|)^2+\sqrt{x+3} &\ ,\ \ x\leq 2\\\\ e^{6-2\cdot x}+2\cdot \left( cos(x-3)\right) ^3 &\ ,\ \ x\,>\,2\end{cases}$

на отрезке [1; 3] с шагом h=0.2.

@~~hoch~~ · 05.10.2014, 15:14

При x=2 функция неопределена.
Там ln0=??

@Antihaos · 05.10.2014, 17:08 **[ТС]**

В смысле? Чот я ничего не понял D:

@~~hoch~~ · 05.10.2014, 17:17

Все просто. При x=2 для вычисления функции
придётся вычислить ln0. Это тоже самое, что
разделить на 0. Функция неопределена.
Но это значение (x=2) попадает под табуляцию.
Как с ним поступить? Исключить? Или? Не мне решать ...

@Antihaos · 05.10.2014, 17:30 **[ТС]**

Сообщение от hoch

Все просто. При x=2 для вычисления функции
придётся вычислить ln0. Это тоже самое, что
разделить на 0. Функция неопределена.
Но это значение (x=2) попадает под табуляцию.
Как с ним поступить? Исключить? Или? Не мне решать ...

Сделать что-нибудь, чтобы можно было написать программу =D

@~~hoch~~ · 05.10.2014, 18:02

Pascal

uses Crt;
var x: real;
function f(x:real):real;
begin
   if x<2 then f:= ln(sqr(x-2)) + sqrt(x+3);
   if x>2 then f:= exp(6-2*x) + 2*cos(x-3)*sqr(cos(x-3));
end;
 
BEGIN
   clrscr;
   x:= 1;
   repeat
      if (x<1.9) or (x>2.1) then
         begin
            writeln('f(',x:0:1,') =  ',f(x):0:4);
            x:= x + 0.2;
         end
      else
         begin
            writeln('f(',x:0:1,') =  ','Неопределено');
            x:= x + 0.2;
         end;
 
   until x > 3.1;
   readln
END.

@Antihaos · 05.10.2014, 18:19 **[ТС]**

Спасибо большое =)

@Antihaos 0 / 0 / 0 Регистрация: 05.10.2014 Сообщений: 37
		1
	Составить программу табулирования функции 05.10.2014, 14:50. Показов 1680. Ответов 6 Метки нет (Все метки) Здравствуйте. Помогите составить программу, пожалуйста. Составить программу табулирования функции: $https://www.cyberforum.ru/cgi-bin/latex.cgi?y=\begin{cases}\ln (\|x-2\|)^2+\sqrt{x+3} &\ ,\ \ x\leq 2\\\\ e^{6-2\cdot x}+2\cdot \left( cos(x-3)\right) ^3 &\ ,\ \ x\,>\,2\end{cases}$ на отрезке [1; 3] с шагом h=0.2. 0

@~~hoch~~ Заблокирован
	05.10.2014, 15:14	2
	При x=2 функция неопределена. Там ln0=?? 0

@Antihaos 0 / 0 / 0 Регистрация: 05.10.2014 Сообщений: 37
	05.10.2014, 17:08 [ТС]	3
	В смысле? Чот я ничего не понял D: 0

@~~hoch~~ Заблокирован
	05.10.2014, 17:17	4
	Все просто. При x=2 для вычисления функции придётся вычислить ln0. Это тоже самое, что разделить на 0. Функция неопределена. Но это значение (x=2) попадает под табуляцию. Как с ним поступить? Исключить? Или? Не мне решать ... 0

@Antihaos 0 / 0 / 0 Регистрация: 05.10.2014 Сообщений: 37
	05.10.2014, 17:30 [ТС]	5
	Сообщение от hoch Все просто. При x=2 для вычисления функции придётся вычислить ln0. Это тоже самое, что разделить на 0. Функция неопределена. Но это значение (x=2) попадает под табуляцию. Как с ним поступить? Исключить? Или? Не мне решать ... Сделать что-нибудь, чтобы можно было написать программу =D 0

@Antihaos 0 / 0 / 0 Регистрация: 05.10.2014 Сообщений: 37
	05.10.2014, 18:19 [ТС]	7
	Спасибо большое =) 0

Опции темы

Составить программу табулирования функции

Решение