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 .
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
end.
# Chúc bạn học tốt
Mình xin hay nhất ạ !!
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
