Question

Nhập vào số nguyên dương n, viết chương trình tính tổng các số lẻ nhỏ hơn hoặc bằng n.

Answer 1

Program In_So_Le;

 

Uses crt;

var i,n: integer;

Begin

Clrscr;

Write('Nhap so n ='); readln(n);

For i:=1 to n do if i mod 2 =1 then Write(i:3,',');

readln

end.