uses crt;
var s,n:int64;
begin
clrscr;
s:=0;
n:=0;
while s<1000000 do
begin
n:=n+1;
s:=s+n;
end;
writeln(n);
readln;
end.
viết chương trình tìm số tự nhiên n lớn nhất để tổng 1+2+3+..n< 1000.<cần gấp SOS:((((>
Viết chương trình nhập vào dãy số tự nhiên. Đếm và in ra màn hình số phần tử chẵn, tính tổng số phần tử chẵn trong n số vừa nhập. (Lưu ý không dùng mảng)
Mọi người ơi, giúp em với ạ
Viết chương trình tính tổng A = \(\dfrac{1}{1}\) + \(\dfrac{1}{2}\) + \(\dfrac{1}{3}\) + ... + \(\dfrac{1}{n}\)
__________________________
Rất mong mọi người giúp đỡ mình ạ T-T
Viết chương trình in ra màn hình sử dụng vòng lặp while để in ra màn hình tổng các số có giá trị lớn hơn 2.000 với n là số tự nhiên lớn hơn 2
Viết chương trình tính tổng: S=1+1/2+1/3+...+1/n
Biết n là số tự nhiên được nhập từ bàn phím
viết chương trình với thuật toán sau:
Bước 1. S←0,n←0
Bước 2. Nếu S ≤ 1000 thi chuyển tới bước 3; ngược lại ( S>1000) chuyển tới bước 4 Bước 3. n←n+1; S←S+n; và quay lại bước 2
Bước 4. In kết quả: S và n là số tự nhiên nhỏ nhất sao cho S > 1000. Kết thúc thuật toán.
Viết chương trình nhập số tự nhiên n 2 in ra màn hình các số chẵn từ 1 đến n tính tổng số chẵn Vd) N=10;các số chẵn2,4,6,8,10 Tính tổng =2+4+6+8+10
Câu 1 : Viết chương trình nhập vào số tự nhiên n. Sau đó tính và in ra màn hình sau :
S=1+1/2+1/3+. . . + 1/n
Câu 2 : Nhập vào một dãy số gồm n phần tử là các số nguyên ( Số n nhập từ bàn phím ) . Tính tổng phần tử lớn nhất và phần tử nhỏ nhất trong dãy số vừa nhập
Em cần gấp ạ cảm ơn
