Mọi người giúp em với Cho số tự nhiên n (1 ≤ n ≤ 10^9) Nhiệm vụ của bạn là hãy tính giá trị của biểu thức: F = –1 + 2 – 3 + 4 – … (–1)^n*n INPUT - Một số nguyên dương n OUTPUT - Giá trị của F tìm được.
1 câu trả lời
Program BTT;
Uses crt;
Var i,n,F: longint;
Begin
Clrscr;
Write('Nhap n: '); Readln(n);
F:=0;
For i:=1 to n do
Begin
If i mod 2 = 1 then F:=F-i;
If i mod 2 = 0 then F:=F+i;
End;
Write(F);
Readln
End.