Mọi người giúp mình câu này đi cần nộp gấp Viết chương trình: – Nhập vào số nguyên N – Tính tổng các số chẵn nhỏ hơn N và xuất kết quả ra màn hình.

0 bình luận về “Mọi người giúp mình câu này đi cần nộp gấp Viết chương trình: – Nhập vào số nguyên N – Tính tổng các số chẵn nhỏ hơn N và xuất kết quả ra màn hình.”

1. Program BTH;
   uses crt;
   var n,i,s:integer;
   Begin
           clrscr;
           write(‘Nhap n: ‘); readln(n);
           for i:=2 to n-1 do
                   If i mod 2 =0 then s:=s+i;
           writeln(‘Tong day so tren la: ‘,s);
           readln;
   end.

   Bình luận