cho số tự nhiên N(1 N<10^6). Tính tổng sau : S= 1-2+3-4+5-6...+N viết chương trình ra giúp vs
cho số tự nhiên N(1 N<10^6). Tính tổng sau : S= 1-2+3-4+5-6...+N viết chương trình ra giúp vs
By Daisy
By Daisy
cho số tự nhiên N(1 N<10^6). Tính tổng sau : S= 1-2+3-4+5-6...+N viết chương trình ra giúp vs
program tinh_tong;
uses crt;
var n,i,S:integer;
begin
clrscr;
write(‘Nhap N: ‘); readln(n);
S:=0;
for i:=1 to n do
if i mod 2=1 then S:=S+i else S:=S-i;
write(‘S= ‘,s);
readln;
end.
Giải thuật:
TONG.INP gồm 1 số N
– Trước hết cộng số lẻ từ 1 đến N (có được tổng S), thực hiện vòng lặp S:=S+i;
– Sau đó tiến hành cho i chạy từ 2 đến N kiểm tra điều kiện số chẵn, thực hiện S:=S-j;
Write(S); ra để xuất vào file TONG.OUT