tính tổng các số chắn của dãy gồm 100 số tự nhiên đầu tiên bằng cách dùng While Cần gấp

Bởi

tính tổng các số chắn của dãy gồm 100 số tự nhiên đầu tiên bằng cách dùng While
Cần gấp

0 bình luận về “tính tổng các số chắn của dãy gồm 100 số tự nhiên đầu tiên bằng cách dùng While Cần gấp”

  2. Chúc học tốt

    Program tinhtong;

    Uses crt;

    var i,s:longint;

    begin

    clrscr;

    i:=1;s:=0;

    While i<= 100 do If i mod 2 = 0 then S:= S+i;

    begin

    s:=s+i;

    i:=i+1;

    Writeln(‘ tong cac so chan :’,S);

    Readln;

    end.

    Bình luận

Viết một bình luận