Viết chương trình tính tổng của các số lẻ từ 1 đến N với N là số tự nhiên được nhập từ bàn phím ( Thuật toán và chương trình ).
2 câu trả lời
program bai1;
var s,i,n:longint;
begin
write('N= ');
readln(n);
s:=0;
for i:=1 to n do
if i mod 2<>0 then s:=s+i;
write('s= ',s);
readln
thuật toán:
B1: nhập n;
B2: s←0; i←1;
B3: nếu i=n thì xuất s;
B4: nếu(i mod 2=1) thì s←s+i;
B5: i←i+1;
B6: quay lại B3;
chương trình:
program bai_giai;
uses crt;
var n,i,s:longint;
begin
clrscr;
write('nhap n:');readln(n);
s:=0;
for i:=1 to n do if(i mod 2=1)then s:=s+i;
write('s=',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
