Viết chương trình tính tổng s=1-2+3-4+-.-N 13/08/2021 Bởi Margaret Viết chương trình tính tổng s=1-2+3-4+…..-N
program ct; uses crt; var s,i,n:integer; begin s:=1; for i:=2 to n do s:=s*i; writeln(‘tich’,s); readln; end. Bình luận
program ct;
uses crt;
var s,i,n:integer;
begin
s:=1;
for i:=2 to n do s:=s*i;
writeln(‘tich’,s);
readln;
end.