Viết công thức tính tổng t = 2 mũ 1 + 3 mũ 2 + 4 mũ 3 + 5 mũ 4 có sử dụng công thức con

2 câu trả lời

uses crt;

var i,kq:integer;

function mu(k:integer):integer;

var j:integer;

begin

       mu:=1;

       for j:=1 to k-1 do

              mu:=mu*k;

end;

BEGIN

       clrscr;

       kq:=1;

       for i:=1 to n do

              kq:=kq+mu(i);

       write(kq);

       readln;

end.

             

Câu hỏi trong lớp Xem thêm