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
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.
program cau1;
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ương trình:
uses crt;
var s,i,n: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