em hãy viết chương trình tính tổng các số nguyên liên tiếp từ n đến m là các số nguyên dương nhập vào từ bàn phím(in ngôn ngữ passcal)
2 câu trả lời
uses crt;
var n, m, k, s : integer;
begin
clrscr;
write('nhap so n va m : '); readln(n, m);
if (m > 0) and (n > 0) and (n <= m) then
begin
s := 0;
for k := n to m do s := s + k;
writeln('tong = ', s);
end;
readln
end.
uses crt;
var n,m,s,i:longint;
begin
clrscr;
write('nhap n,m:');readln(n,m);
for i:=n to m do s:=s+i;
write('s=',s);
readln
end.
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
