Em hãy viết chương trình tính tổng n số tự nhiên sao cho tổng nhỏ nhất lớn hơn 2500 Nhanh nha e đang cần gấp 20/07/2021 Bởi Maria Em hãy viết chương trình tính tổng n số tự nhiên sao cho tổng nhỏ nhất lớn hơn 2500 Nhanh nha e đang cần gấp
Var S,n : integer; Begin S:=0; n:=0; While S<=2500 do begin n:==n+1; S:=S+n; end; writeln (‘So n nho nhat de tong >2500la’,n); writeln (‘Tong dau tien>2500 la ‘,S); End. Nếu được bạn cho mình xin câu trả lời hay nhất nha Bình luận
program tong_lonhon; Uses crt; var n,t:integer; begin clrscr; n:=0; t:=0; while t<=2500 do begin n:=n+1; t:=t+n; end; write(‘n= ‘,n,’ va khi do tong bang ‘,t); readln; end. Bình luận
Var S,n : integer;
Begin
S:=0;
n:=0;
While S<=2500 do
begin n:==n+1;
S:=S+n;
end;
writeln (‘So n nho nhat de tong >2500la’,n);
writeln (‘Tong dau tien>2500 la ‘,S);
End.
Nếu được bạn cho mình xin câu trả lời hay nhất nha
program tong_lonhon;
Uses crt;
var n,t:integer;
begin
clrscr;
n:=0; t:=0;
while t<=2500 do
begin
n:=n+1;
t:=t+n;
end;
write(‘n= ‘,n,’ va khi do tong bang ‘,t);
readln;
end.