Viết chương trình in ra các tổng các số lẻ nhỏ hơn hoặc bằng n(với n được nhập)
2 câu trả lời
- Hướng dẫn:
– Cho S = 0.
– Cho biến i chạy từ 1 đến n.
– Nếu i chẵn ( i chia 2 dư 0) thì cộng thêm i vào S.
– In ra S.
uses crt;
var n,i,sl:longint;
begin
clrscr;
write('n);
readln(n);
for i:=1 to n do
if i mod 2<>0 then sl:=sl+i;
writeln('tong cac so le: ',sl);
readln
end.
Câu hỏi trong lớp
Xem thêm