Tính tổng các số tự nhiên từ m đến n
K
Khá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.
Những câu hỏi liên quan
ML
19 tháng 3 2023
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.
NB
16 tháng 4 2023
program TinhTongTu1DenN;
var
N, i, tong: integer;
begin
write('Nhap so N: ');
readln(N);
tong := 0;
for i := 1 to N do
tong := tong + i;
writeln('Tong cac so tu 1 den ', N, ' la: ', tong);
readln;
end.
EP
16 tháng 4 2023
N = int(input("Nhập số tự nhiên N: "))
tong = 0
for i in range(1, N+1):
tong += i
print("Tổng các số từ 1 đến ", N, " là: ", tong)
uses crt;
var i,m,n,t:integer;
begin
clrscr;
repeat
write('Nhap m='); readln(m);
write('Nhap n='); readln(n);
until (0<=m) and (0<=n) and (m<n);
t:=0;
for i:=m to n do
t:=t+i;
writeln('Tong cac so tu nhien trong khoang tu ',m,' toi ',n,' la: ',t);
readln;
end.
m đến n hay là 1 đến n???