Phần mềm học tập

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Nguyễn Thị Kim Ngân

viết chương trình tính biểu thức s=1-x+x^2/2!-x^3/3!+.....+(-1)^n*x^n/n!

Minh Lệ
13 tháng 11 2019 lúc 18:00

Program hotrotinhoc;

var n,x,i: integer;

s: real;

function t1(d: integer): longint;

var i,t: longint;

begin

t:=1;

for i:=1 to d do t:=t*i;

t1:=t;

end;

function t2(a,b: integer): longint;

var i,tg: integer;

begin

tg:=1;

for i:=1 to a do tg:=tg*b;

t2:=tg;

end;

begin

write('n='); readln(n);

write('x='); readln(x);

s:=1;

for i:=1 to n do

if i mod 2=1 then s:=s-((t2(i,x))/(t1(i))) else s:=s+((t2(i,x))/(t1(i)));

write(s:1:2);

readln

end.

Khách vãng lai đã xóa

Các câu hỏi tương tự
ume Shoto sả
Xem chi tiết
Ho Truong Minh
Xem chi tiết
Huong Dinh
Xem chi tiết
Finn
Xem chi tiết
Trần Lý Anh Tuấn
Xem chi tiết
Thái Nguyên Khuê
Xem chi tiết
Phạm Tạ Thảo Nguyên 8c
Xem chi tiết
Thanh Tâm Nguyễn
Xem chi tiết
vothixuanmai
Xem chi tiết