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

0 bình luận về “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”

1. 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.

   Bình luận

2. 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

   Bình luận