Giải phương trình: 1.tính x^y với x,y là số thực? 2.tính n!(biết n!=1.2.3.4...n)? 3.cho số tự nhiên n.Hãy lập trình tính tổng: a.1+1/2^2+1/3^2+...+1/n^2 b.1+1/2!+1/3!+...+1/n! PLEASE HELP ME T-T

2 câu trả lời

1.

var x,y,kq.i:longint;

begin

kq:=1;

write('Nhap x,y: '); readln(x,y);

for i:=1 to y do

kq:=kq*i;

write('Ket qua la: ',kq);

readln;

end.

2.

var i,n,kq:longint;

begin

write('Nhap n: '); readln(n);

kq:=1;

for i:=1 to n do

kq:=kq*i;

write('Giai thua cua n la: ',kq);

readln;

end.