Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.71/7: Рейтинг темы: голосов - 7, средняя оценка - 4.71
0 / 0 / 1
Регистрация: 10.12.2015
Сообщений: 9
1

Вычислить значение полинома

28.01.2016, 16:31. Показов 1347. Ответов 1
Метки нет (Все метки)

выполнить с использованием функции
ввод и вывод массивов и других данных не объединять с обработкой данных.

Для каждого значения z (z=1; 1.2; 1.4;...;2.6) вычислить значение полинома p(z)=a6z^6+a5z^5+a4z^4+...+a1z+a0. Использовать подпрограмму для нахождения полинома для одного zi.
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
28.01.2016, 16:31
Ответы с готовыми решениями:

Вычислить значение полинома
Вычислить значение полинома P(x) в произвольной точке x, если P(x)=1 + x + x^2 + x^3...+x^3...+x^n....

Вычислить значение полинома в заданной точке
Составить программу вычисления в точке x=x* procedure и function (с использованием текстовых...

Напишите функцию, которая рассчитывает значение полинома степени N.
Напишите функцию, которая рассчитывает значение полинома степени N. Коэффициенты полинома заданы...

Используя только линейные списковые структуры вычислить значение первой производной полинома в заданной точке x
Это задание надо выполнять без использования двоичных деревьев, а используя только линейные...

1
Почетный модератор
64086 / 47495 / 32734
Регистрация: 18.05.2008
Сообщений: 115,182
28.01.2016, 16:53 2
Лучший ответ Сообщение было отмечено grilexad как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
uses crt;
const n=6;
type mas=array[0..6] of real;
function P(x:real;m:mas):real;
var i,j:byte;
    s,y:real;
begin
s:=m[0];
for i:=n downto 1 do
 begin
  y:=1;
  for j:=1 to i do
  y:=y*x;
  s:=s+m[i]*y;
 end;
P:=s;
end;
 
var a:mas;
    i:byte;
    x,z:real;
begin
writeln('Введите ',n+1,' коэффициентов многочлена:');
for i:=n downto 0 do
 begin
  write('a[',i,']=');
  readln(a[i]);
 end;
clrscr;
writeln('Коэффициенты многочлена:');
for i:=n downto 0 do
write(a[i]:0:1,' ');
writeln;
z:=1;
while z<=2.6 do
 begin
  writeln('z=',z:3:1,'  P(z)=',P(z,a):8:3);
  z:=z+0.2;
 end;
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
28.01.2016, 16:53

Вычислить значение полинома по схеме Горнера
ПОМОГИТЕ МОЖАЛУЙСТА,НУЖНО НАПИСАТЬ ПРОГРАММУ: Вычислить: p(x)=a(n)x^n+a(n-1)x^(n-1)+...+a1x+a(o)...

Вычислить значение полинома
вычислить,А1*х + А2*х2 + А3*х3 + ... + Аn*xn не пользуясь схемой Горнера

Вычислить значение полинома
Описать функцию P(x), вычисляющую значение полинома в произвольной точке x по формуле...

Вычислить и напечатать значение полинома степени n с коэффициентами a
Здравствуйте,помогите пожалуйста с моим вопросом уже просто не знаю как исправить !!! Значит...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru