ВВЕРХ
ВНИЗ

Значение функции

Begin25. Найти значение функции y = 3x6 − 6x2 − 7 при данном значении x.

Запишем нашу функцию так:

y = 3(xx2)2 - 6x2 - 7.

Тогда имеем первый вариант решения:

Блок схема. Begin25. Найти значение функции y = 3x^6 − 6x^2 − 7 при данном значении x

Код Pascal
1  
2  
3  
4  
5  
6  
7  
8  
9  
10  
var
  x, y: real;

begin
  write('x = ');
  readln(x);
  y := 3 * sqr(x * sqr(x)) - 6 * sqr(x) - 7;
  writeln('y = ', y);
  readln
end.

Далее запишем функцию в виде:

y = 3t(t2 - 2) - 7,

где t = x2. Имеем второй вариант решения:

Блок схема. Begin25. Найти значение функции y = 3x^6 − 6x^2 − 7 при данном значении x

Код Pascal
1  
2  
3  
4  
5  
6  
7  
8  
9  
10  
11  
var
  x, y: real;

begin
  write('x = ');
  readln(x);
  x := sqr(x); { <-- Вычисляем квадрат числа }
  y := 3 * x * (sqr(x) - 2) - 7;
  writeln('y = ', y);
  readln
end.

Begin26. Найти значение функции y = 4(x−3)6 − 7(x−3)3 + 2 при данном значении x.

Запишем нашу функцию так:

y = 4t2 - 7t + 2,

где t = (x-3)3. Тогда имеем код (только вместо t используем x):

Блок схема. Begin26. Найти значение функции y = 4(x−3)^6 − 7(x−3)^3 + 2 при данном значении x.

Код Pascal
1  
2  
3  
4  
5  
6  
7  
8  
9  
10  
11  
12  
var
  x, y: real;

begin
  write('x = ');
  readln(x);
  x := x - 3; { <-- Уменьшаем x на 3 }
  x := x * sqr(x); { <-- Вычисляем третью степень числа x }
  y := 4 * sqr(x) - 7 * x + 2;
  writeln('y = ', y);
  readln
end.



Яндекс.Метрика