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 21/07/2021 Bởi Peyton 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
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. Bình luận
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ó