{program bt_1;
uses crt;
Var:S ,n, i, j:longint;
Begin
clrsr;
Write('Nhap n');Readln(n);
For i:=1 to n do
Begin
S:=0;
For j:=0 to i do
if i mod j:=0 then S:=S+j;
if S=2*i then Write (i:5);
end;
readln;
end.
}
{program bt_1;
uses crt;
Var:S ,n, i, j:longint;
Begin
clrsr;
Write('Nhap n');Readln(n);
For i:=1 to n do
Begin
S:=0;
For j:=0 to i do
if i mod j:=0 then S:=S+j;
if S=2*i then Write (i:5);
end;
readln;
end.
}
Câu 1: Viết chương trình nhập 10 số nguyên N và tính tổng các số đó
Câu 2: Viết chương trình nhập 10 số nguyên N và in ra màn hình số lượng các số chẳn đã nhập được
Câu 3: Viết chương trình nhập 2 số M, N (M nhỏ hơn N) in ra màn hình các số lẻ có trong khoảng từ M đến N
Các bạn ai đó giúp mình làm những bài này nhé. Cảm ơn!
Viết chương trình nhập vào 1 số nguyên N tính và in ra màn hình tổng các số chẵn nhỏ hơn N.
Help meeeeeeeee!!!!
1. Viết chương trình nhập vào 1 số tự nhiên P. Tính và in ra màn hình các số lẻ và tổng các số lẻ từ 1 đến P. 2.Viết chương trình nhập vào 1 số tự nhiên N. Tính và in ra màn hình các số chẵn và tổng các số chẵn từ 1 đến N. 3. Viết chương trình nhập vào 1 số tự nhiên N. Tính tổng các số là ước của N. 4. Viết chương trình nhập vào 1 số tự nhiên N. Tính tổng các số là bội của 3 mà nhỏ hơn hoặc bằng N.
Viết chương trình in ra các số lẻ nhỏ hơn hoặc bằng số nguyên dương n ( Với n được nhập).
Yêu cầu nhập lại nếu n<=0
ai trả lời giúp mình được ko cảm ơn
Viết chương trình nhập vào dãy n số nguyên dương tìm và in ra màn hình số lớn nhất trong các số vừa nhập( dùng lệnh while do) giúp mình với ạ
Viết chương trình nhập vào một số n in ra màn hình tổng số n vừa nhập bằng câu lệnh lập While do
Viết chương trình nhập vào một dãy n số nguyên, tính tổng các số vừa nhập, thông báo kết quả ra màn hình
viết chương trình nhập vào 1 số tự nhiên n ( n khác 0) in ra màn hình các số trong phạm vi từ 1 đến n
Viết chương trình nhập vào 5 số nguyên bất kì in ra màn hình số chẵn và số lẻ trong dãy số vừa nhập