Question

calculati pentru primii n termenii punctul c si d

Answer 1

Pascal:

var  

 a,b,i,n:integer;

begin

  write('n:');

  readln(n);

  a:=0;

  b:=1;

  for i:=1 to n do

  begin

  a:=a+n;

  b:=b*n;

  end;

  writeln('Suma=',a);

  writeln('Produsul=',b);

end.