Question

calculati pentru primii n termeni

3+6+9+12+... si 3*6*9*12*...:
4+8+12+16+... SI 4*8*12*16*....

EXEMPLU pentru n=3 avem 1+3+5=9: 1*3*5=15

Answer 1

Program Tema2;
var n,s,k:integer;
      p:real;
begin
s:=0;
p:=1;
(*Variabila k iti spune cu cat este inmultit fiecare termen in parte*)
(*Daca vrei sa-l faci pe c) pui 3, daca vrei sa-l faci pe d) pui 4*)
k=3;   
writeln('Introduceti numarul: ');
readln(n);

for i=1 to n do
begin
s:=s+k*i;
p:=p*k*i;
end;
writeln('Suma este: ',s);
writeln('Produsul este: ',p);
end.