Cho dãy số từ 0 đến N(N nhập từ bàn phím) Tính tổng các số lẻ trong dãy số

Cho dãy số từ 0 đến N(N nhập từ bàn phím)
Tính tổng các số lẻ trong dãy số

0 bình luận về “Cho dãy số từ 0 đến N(N nhập từ bàn phím) Tính tổng các số lẻ trong dãy số”

  1. uses crt;
    var n,i,s:longint;
    begin
    clrscr;
       write(‘Nhap n: ‘); readln(n);
       for i:=0 to n do 
          if i mod 2=1 then inc(s,i);
       writeln(‘Tong cac so le: ‘,s);
    readln
    end.

    Bình luận

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