С наступающим Новым годом! Форум программистов, компьютерный форум, киберфорум
Наши страницы
PascalABC.NET
Войти
Регистрация
Восстановить пароль
 
Астик777
0 / 0 / 0
Регистрация: 12.03.2017
Сообщений: 19
1

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

21.04.2017, 16:47. Просмотров 146. Ответов 4
Метки нет (Все метки)

Составьте программу для вычисления при заданных x и a значения функции y вида:
а)y=((((((((x+a)^2+a)^2+a)^2+a)^2+a)^2+a)^2+a)^2+a)^2+a)^2;
б)y=a+(a+(a+(a+(a+(a+(a+x)^2)^2)^2)^2)^2)^2)^2;
Условие препода решить с использованием Оператора цикла FOR.
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
21.04.2017, 16:47
Ответы с готовыми решениями:

Вычислить значение функции
Почему для этой функции (50*x*x*x*x+51*y*y*y*y-2*y*y*(50*x*x+4)+25) работает, а...

Вычислить значение функции
Вычислить значение функции: U(x,y):=(y>= -2) and (abs(x)<=1) and ((x>=0) and...

Вычислить значение функции
По данным значениям аргументов a и b вычислить значение функции f(a,b). При...

Вычислить значение функции
Не получается решить. Битый час уже сижу

Вычислить значение функции
Вычислить значение функции y=cosx для произвольного числа x, используя ее...

4
Alexandr212
94 / 91 / 110
Регистрация: 28.11.2016
Сообщений: 504
21.04.2017, 16:56 2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
var
  x, a, i: integer;
  y: real;
 
begin
  {a}readln(x, a);
  y := x + a;
  for i := 1 to 8
    do y := sqr(y) + a;
  y := sqr(y);
  writeln(y);
  {b}y := x + a;
  for i := 1 to 9
    do y := sqr(y) + a;
  writeln(y);
end.
0
Joy
Эксперт Pascal/Delphi
2175 / 1202 / 1438
Регистрация: 29.08.2014
Сообщений: 4,389
22.04.2017, 00:17 3
Астик777, у вас скобки стоят не верно!

Добавлено через 21 минуту
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
var
  x,a,t:real;
begin
  x:=ReadlnReal('x=');
  a:=ReadlnReal('a=');
  t:=x;
  for i:integer:=1 to 8 do t:=sqr(t+a);
  writeln('a: f(x)=',t);
  t:=x;
  for i:integer:=1 to 7 do t:=sqr(a+t);t:=a+t;
  writeln('b: f(x)=',t);
//для проверки
  writeln(sqr(sqr(sqr(sqr(sqr(sqr(sqr(sqr(x+a)+a)+a)+a)+a)+a)+a)+a));
  writeln(a+sqr(a+sqr(a+sqr(a+sqr(a+sqr(a+sqr(a+sqr(a+x))))))));
end.
Добавлено через 2 минуты

Не по теме:

x= 0.1
a= 0.01
a: f(x)=0.000102051443391174
b: f(x)=0.0101020514446905
0.000102051443391174
0.0101020514446905

0
Астик777
0 / 0 / 0
Регистрация: 12.03.2017
Сообщений: 19
23.04.2017, 12:29  [ТС] 4
Alexandr212 это номер а???
0
Alexandr212
94 / 91 / 110
Регистрация: 28.11.2016
Сообщений: 504
24.04.2017, 17:16 5
и а и б, там подписано.
0
24.04.2017, 17:16
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
24.04.2017, 17:16

Вычислить значение функции
Вычислить значение функции Z при одном значении X: Z = Y2 + X2, где

Вычислить значение функции
Вычислить значение функции y=4x3-2x2+5 для значений x, изменяющихся от -3 до 1...

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


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru