A Mapleben nincs olyan parancs, amely közvetlenül számolni lehetne a hiányzó paramétereket ebben az esetben. De persze meg lehet írni. Írhatnál példát, hogy pontosan mit szeretnél.
Mindenesetre a számtani sorozat szemléltetésére kipróbálhatod az alábbiakat (a mértani sorozatra hasonlóan lehet):
restart;
an:=n->a1+(n-1)*d;# számtani sorozat n-edik eleme
Sn:=n->add(an(i),i=1..n);# számtani sorozat elsõ n tagjának összege
anek:=n->seq(an(i),i=1..n);#a számtani sorozat elemei an-ig(kilistázza)
Snek:=n->seq(Sn(i),i=1..n);#a számtani sorozat tagjainak összege
# pl.
a1:=2; d:=3;N:=20;#
an(N);
Sn(N);
anek(N);
Snek(N);
# ábrázolás
plots[pointplot]([seq([i,an(i)],i=1..10)],title="Számtani sorozat elemei",labels=["n","an"]);
plots[pointplot]([seq([i,Sn(i)],i=1..10)],title="Számtani sorozat tagjainak összege",labels=["n","Sn"]);
Informatika és tudomány
