Thuật toán:
- nhập m,n
- cho i=m chạy đến n
- nếu đang lặp mà i chia lấy dư 2=1 thì cộng i vào s
- in kết quả s ra màn hình
Chương trình:
uses crt;
var m,n,i,s:longint;
begin
clrscr;
readln(m,n);
for i:=m to n do
if i mod 2=1 then inc(s,i);
writeln(s);
readln
end.