viết chương trình tính tổng s=1+3+5+…+n biết rằng giá trị n lẻ được nhap tu ban phim 28/07/2021 Bởi Athena viết chương trình tính tổng s=1+3+5+…+n biết rằng giá trị n lẻ được nhap tu ban phim
program baitap;uses crt;var n,i,s:integer;begin readln(n); s:=0; i:=1; while i <= n do begin s:=s+i; i:=i+2; end; writeln(s); readln;end. Bình luận
program baitap;
uses crt;
var
n,i,s:integer;
begin
readln(n);
s:=0;
i:=1;
while i <= n do
begin
s:=s+i;
i:=i+2;
end;
writeln(s);
readln;
end.