Viết chương trình nhập vào 1 số nguyên.Tính và đưa ra màn hình tổng các số lẻ từ 1->n(số vừa nhập)
Giải thích
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
n = int(input("Nhập số nguyên n: "))
tong = 0
i = 1
while i <= n:
tong += i
i += 1
print("Tổng các số từ 0 đến", n, "là:", tong)
Câu 1:
Program HOC24;
var i,p: integer;
t: longint;
begin
write('Nhap P: '); readln(p);
t:=0;
for i:=1 to p do if i mod 2<>0 then t:=t+i;
write('Tong cac so le la: ',t);
readln
end.
Câu 1:
uses crt;
var s,i,n:integer;
begin clrscr;
s:=0;
write('Nhap n: ');readln(n);
for i:=1 to n do
if i mod 2 <> 0 then inc(s,i);
write('Tong cac so le tu 1 den ',n,' la: ',s);
readln
end.
Câu 2:
uses crt;
var s,i,n:integer;
begin clrscr;
s:=0;
write('Nhap n: ');readln(n);
for i:=1 to n do
if i mod 2 = 0 then inc(s,i);
write('Tong cac so le tu 1 den ',n,' la: ',s);
readln
end.
{PROGRAM Bai_tap1;
USES crt;
VAR n, i, C, L:Bytbe;
BEGIN
clrscr;
Write('Nhap n:');Readln(n);
C:=0;L:=0;
For i:=1 to n do
If i mod 2=0 then C:=C+i else L:=L+i;
writeln('Tong cac so chan la:',C);
writeln ('Tong cac so le la:',L);
Readln;
end.
}
uses crt;
var i,n,t:integer;
begin
clrscr;
write('nhap n='); readln(n);
t:=0;
for i:=1 to n do
if i mod 2=1 then t:=t+i;
writeln(t);
readln;
end.
Program bt_3;
Uses crt;
Var Tong, n, i: integer;
Begin
Clrscr;
Writeln(‘nhap n=’);
Readln (n);
Tong:=0;
For i:=1 to n do
If I mod 2 = 1 then Tong:= Tong+i;
Writeln(‘Tong la:’,Tong);
Readln
End.
Để tính tổng các số lẻ từ 1 đến n, em có thể sử dụng vòng lặp và biến tích luỹ. - Nhập số nguyên n từ bàn phím. - Khởi tạo biến `tong` = 0 để lưu tổng. - Dùng vòng lặp `i` chạy từ 1 đến n, bước nhảy 2 (1, 3, 5,…), mỗi lần cộng `tong = tong + i`. - Sau khi vòng lặp kết thúc, in biến `tong` ra màn hình. Ví dụ với Pascal: ``` var n,i,tong: integer; begin readln(n); tong:=0; for i:=1 to n do if i mod 2 <> 0 then tong:=tong + i; writeln('Tong cac so le tu 1 den ', n,' = ', tong); end. ``` Hoặc với Python: ``` n = int(input()) tong = 0 for i in range(1, n+1, 2): tong += i print('Tong so le tu 1 den', n, 'la', tong) ``` Giải thích: `i mod 2 <> 0` (hoặc `i % 2 != 0`) dùng để kiểm tra số lẻ; vòng lặp cộng dồn các số lẻ vào biến `tong`.