Viết chương trình in ra màn hình tổng các số 1;3;5;7;...; 2n-1 sao cho tổng nhỏ nhất lớn hơn 1000. Help me pls :(((
2 câu trả lời
uses crt;
var S,n:integer;
begin
clrscr; n:=1;
while S<=1000 do
begin
S:=S+(2*n-1);
inc(n);
end;
writeln('S la: ',S);
writeln('n la: ',n);
readln
end.
programMang_le;
uses crt;
var S,n:integer;
begin
clrscr; n:=1;
while S<=1000 do
begin
S:=S+(2*n-1);
inc(n);
end;
writeln('S la: ',S);
writeln('n la: ',n);
readln
end.
Câu hỏi trong lớp
Xem thêm