Lập chương trình tính tổng s= 1+3+5....+ (2n+1) với n nhập từ bàn phím giúp mình với ạ . cảm ơn ạ
2 câu trả lời
uses crt;
var i,n,s:longint;
begin
clrscr;
write('Nhap n: ');readln(n);
i:=-1; s:=0;
while i<2*n+1 do
begin
inc(i,2);
s:=s+i;
end;
writeln('s= ',s);
readln
end.
program phuongt;
uses crt;
var n, i, k, s: integer;
begin
clrscr;
write('Nhap n = '); readln(n);
k:=2*n+1;
for i:=1 to k do if i mod 2 <> 0 then s:=s+i;
write('s = ', s);
readln
end.
