Viết chương trình tổng các số tự nhiên lẽ hơn N. So vs N được nhập từ bàn phím
2 câu trả lời
program oken;
uses crt;
var i,n,s:longint;
begin
clrscr;
write('nhap 1 so bat ky: '); readln(n);
i:=1; s:=0;
while i<=n do
begin
if (i mod 2=1) then
s:=s+i;
i:=i+1;
end;
writeln('Tong cac so le tu 1 den ',n,': ',s);
readln;
end.
var n,i,s:longint;
begin
write('nhap so n=');readln(n);
s:=0;
for i:=1 to n do s:=s+i;
writeln(' tong n so nguyen la:',s);
readln;
end.
Câu hỏi trong lớp
Xem thêm
- Đề 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
