Câu 6: Viết chương trình tính tổng của các số lẻ (chẵn) trong N số tự nhiên đầu tiên? Với N là số tự nhiên được nhập vào từ bàn phím.
1 câu trả lời
- Tính tổng các số lẻ trong N số đầu tiên :
uses crt;
var i, N, S : integer;
begin
clrscr;
write('Nhap so N = '); readln(N);
S := 0;
for i := 1 to N do
if i mod 2 <> 0 then S := S + i;
write('Tong le = ', S);
readln
end.
- Tính tổng các số chẵn trong N số đầu tiên :
uses crt;
var i, N, S : integer;
begin
clrscr;
write('Nhap so N = '); readln(N);
S := 0;
for i := 1 to N do
if i mod 2 = 0 then S := S + i;
write('Tong chan = ', 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
