Задача на многочлены, Помогите решить Опции

[Demon_6661]

Кто-нибудь помогите пожалуйста решить задачу: пользователь задает два многочлена от нескольких переменных. Переменные обозначаются латинскими буквами (их число не более 26). Найти сумму и произведение этих многочленов! Заранее спасибо.

[Demon_6661]

Помогите плиз!

[klem4]

Если многочлен линейный то вот так можно ввести данные многочлена (значения параметров и коэффициентов при них) и вычислить его значение:

uses crt;

type

  TCoeff = Single;

  PTCoeffs = ^TCoeffs;

  TCoeffs = array [1..1] of TCoeff;

function P(const params, coeffs: PTCoeffs; const degree: Integer): Single;
var
  i: Integer;
  res: Single;
begin

  res := 0;

  for i := 0 to pred(degree) do
   res := res + params^[i] * coeffs^[i];

 P := res;
end;

procedure GetPolinom(var params, coeffs: PTCoeffs; const degree: Integer);
var
  i: Integer;
begin

  GetMem(params, degree * sizeof(TCoeff));
  GetMem(coeffs, degree * sizeof(TCoeff));

  for i := 0 to pred(degree) do begin
    write('params[', i, '] = '); readln(params^[i]); // значения параметров
    write('coeffs[', i, '] = '); readln(coeffs^[i]); // значения коеффициентов при параметрах
  end;

end;

procedure Free(var params, coeffs: PTCoeffs; const degree: Integer);
begin
  FreeMem(params, degree * sizeof(TCoeff));
  FreeMem(coeffs, degree * sizeof(TCoeff));
end;

var
  coeffs, params: PTCoeffs;

begin

  (*

    Для функции p(x, y, z) = x + 2y + 3z при (x = 2, y = 3, z = 5) :

    params[0] = 2
    params[1] = 3
    params[2] = 5

    coeffs[0] = 1
    coeffs[1] = 2
    coeffs[2] = 3

    P(x, y, z) = 1 * 2 + 2 * 3 + 3 * 5 = 23

  *)

  GetPolinom(params, coeffs, 3);
  writeln('P = ', P(params, coeffs, 3):2:2);
  Free(params, coeffs, 3);

  readln;
end.

[Demon_6661]

Многочлен не обязательно должен быть линейным, а пользователь задает только коэфициенты!

[volvo]

Тогда приведи примеры (хотя бы 5-6) возможных многочленов... Ибо телепаты - в Google

[klem4]

C одними коэффициентами далеко не уедешь, тогда уж и степени надо задавать ...

[Demon_6661]

Пользователь вводит два многочлена
2*(x^2)+2*(y^2)
2*(x^2)-2*(y^2)
Паскаль должен нам выдать
1.Произведение 4*(x^4)-4*(y^4)
2.Сумма 4*(x^2)

[Demon_6661]

Не не так. Пользователь задает массив коэффициентов и степеней каждого многочлена. Например ползователь вводит :
1. 2 3 4
2. 2 4 3
Это значит что он ввел многочлен
2*x^2+4*y^4+4*z^3

[Demon_6661]

Помогите пожалуйста кто-нибудь с задачей!

[мисс_граффити]

а как узнать, к каким переменным это относится?
то есть различить 2x^2 и 2y^2?
или порядок фиксированный, и пользователь должен вводить информацию (пусть нули) по ВСЕМ переменным?
а если у него y^2+2y - как быть?

[Demon_6661]

Каждая переменная может встречаться только 1 раз. Переменные - это английский алфавит (поэтому и ограничение 26). Переменные употребляются в алфавитном порядке. Т. е если пользователь вводит
2 3 4
1 2 3
Это значит что многочлен имеет вид 2*a+3*(b^2)+4*(c^3)

[Demon_6661]

Помогите плиз, сдавать завтра!

[volvo]

Каждая переменная может встречаться только 1 раз.

А я введу
1) X^1 + Y^2
2) Z^3 + A^2

Как должен выглядеть результат перемножения? И где его хранить, собственно, если после твоих утверждений о том, что я привел выше, как цитату, я сделал вот так:

const
  max_degree = 26;
type
  tpoly = record
    coeff: integer;
    power: integer;
  end;
  tpolynom = array[1 .. max_degree] of tpoly;

Теперь результат перемножения я не могу хранить в такой структуре...

[Demon_6661]

Да нет я имею ввиду 1 раз в каждом многочлене

[volvo]

Указателями пользоваться можно? Или только массивы?

[Demon_6661]

тока массивы и записи

[Demon_6661]

help me please

[Demon_6661]

помогите очень нужно

[Demon_6661]

Вопрос жизни и смерти, вопрос зачет или нет! Выручите пожалуйста

[мисс_граффити]

хватит флудить!
сам виноват, что до последнего момента дотянул.

ты говоришь, что каждая переменная в одном многочлене встречается только один раз.
допустим:
1) y^2+2*x
2) x^2+2*y
В сумме и x, и y будут встречаться в разных степенях...

хотя..... если можно пользоваться записями... уже что-то.
максимальная степень ограничена?