ahoj,
Ja mam taky problém s ukolem v pacalu a nevim jak s nim,jestli by jste mohl někdo pomoci?
Uvažujme následující reprezentaci polynomu:
const MaxStupen = 20;
type Poly = array[0..MaxStupen] of real;
{v poli jsou uloženy koeficienty polynomu,
index = exponent příslušného členu}
var A: Poly;
StA: byte; {stupeň polynomu A}
Napište procedury pro následující operace s polynomy:
a) součet dvou polynomů
b) součin dvou polynomů
c) vstup polynomu (zadání stupně a koeficientů z klávesnice)
d) výstup polynomu (výpis na obrazovku v rozumně čitelném tvaru, např. 3x^2–5x+1 )
Procedury by mohly mít tyto hlavičky:
procedure Soucet(A, B: Poly; StA, StB: byte;
var C: Poly, var StC: byte);
procedure Soucin(A, B: Poly; StA, StB: byte;
var C: Poly, var StC: byte);
procedure Vstup(var A: Poly; var StA: byte);
procedure Vystup(A: Poly; StA: byte);