22/08/2020 18:15:51

Một số có tổng các số nhỏ hơn nó bằng chính nó được gọi là số hoàn chỉnh. VD: 6 có các ước nhỏ hơn là 1, 2, 3. Tổng là 1 + 2 + 3 = 6. Viết chương trình xét xem một số n được nhập từ bàn phím có phải số hoàn chỉnh không

Bài 1:
Một số có tổng các số nhỏ hơn nó bằng chính nó được gọi là số hoàn chỉnh. VD: 6 có các ước nhỏ hơn là 1,2,3. Tổng là 1+2+3=6.
Viết chương trình xét xem một số n được nhập từ bàn phím có phải số hoàn chỉnh không.
Hướng dẫn :
- Dùng biến n lưu số cần xét. Biến S có giá trị ban đầu bằng 0.
- Cho i chạy từ 1 đến n-1. Nếu u là ước của n thì cộng thêm i vào S.
- Nếu S =n thì S là số hoàn chỉnh.
Bài 2:
Viết chương trình tìm các số hoàn chỉnh nhỏ hơn n( với n nhập từ bàn phím) .
Hướng dẫn :
- Cho biến i chạy từ 1 đến n. Xét i. Nếu nó là số hoàn chỉnh thì in ra.
Bài 3:
In bảng cửu chương n(với n nhập từ bàn phím).

9 Xem trả lời

+ Trả lời

Hỏi gia sư

+500k

1.793

9 trả lời

Thưởng th.12.2024

Xếp hạng

Đấu trường tri thức +500K

Bài tập 1:

Viết chương trình in ra các số lẻ nhỏ hơn hoặc bằng n (Với n được nhập).

Program In_So_Le;

Uses crt;

var i,n: integer;

Begin

Clrscr;

Write('Nhap so n ='); readln(n);

For i:=1 to n do if i mod 2 =1 then Write(i:3,',');

readln

end.

Bài 2:

Program In_So_Le;

Uses crt;

var Dem,i,n: integer;

Begin

Clrscr;

Write('Nhap so n ='); readln(n);

Dem:= 0;

For i:=1 to n do if i mod 2 =1 then

Begin

Write(i:3,',');

Dem:= Dem + 1;

if Dem mod 15 = 0 then Writeln;

end;

readln

end.

2

Hay nhất

Program Tim_uoc_2;

uses crt;

Var S, n, i,j: longint;

Begin

clrscr;

Write(‘Nhap so n =’); readln(n);

For i:=1 to n do

Begin

S:=0;

For j:=1 to i do if i mod j = 0 then S:=S+j;

if S = 2*i then write(i:6,’,’);

end;

readln

end.

Bài 1:

Program so_hoan_chinh;

Uses crt;

Var i,n,S: integer;

Begin

Write ( ' nhap n la:',); readln (n)

S:=0

For i:=1 to n-1 do

If I mod i= 0 then S:=S+i;

If S=n then write (n, ' do la so hoan chinh') else write (n,' khong phai la so hoan chinh');

Readln

End.

Bài tập 1:

Viết chương trình in ra các số lẻ nhỏ hơn hoặc bằng n (Với n được nhập).

Program In_So_Le;

Uses crt;

var i,n: integer;

Begin

Clrscr;

Write('Nhap so n ='); readln(n);

For i:=1 to n do if i mod 2 =1 then Write(i:3,',');

readln

end.

Bài 1:

Program so_hoan_chinh;

Uses crt;

Var i,n,S: integer;

Begin

Write ( ' nhap n la:',); readln (n)

S:=0

For i:=1 to n-1 do

If I mod i= 0 then S:=S+i;

If S=n then write (n, ' do la so hoan chinh') else write (n,' khong phai la so hoan chinh');

Readln

End.

Program Tim_uoc_2;

uses crt;

Var S, n, i,j: longint;

Begin

clrscr;

Write(‘Nhap so n =’); readln(n);

For i:=1 to n do

Begin

S:=0;

For j:=1 to i do if i mod j = 0 then S:=S+j;

if S = 2*i then write(i:6,’,’);

end;

readln

end.

uses crt;
var n,s,i:longint;
begin
clrscr;
write('Nhap so can kiem tra: ');readln(n);
s:=0;
for i:=1 to n-1 do
if n mod i=0 then s:=s+i;
if s=n then write(n,' la so hoan chinh')
else write(n,' khong phai la so hoan chinh');
readln;
end.

Bài 1;
uses crt;
var n:longint;
function hc(n:longint):boolean;
var s, i:longint;
begin
s:=0;
hc:=false;
for i:=1 to n-1 do if n mod i=0 then s:=s+i;
if s=n then hc:=true;
end;
begin
clrscr;
write('nhap n: '); readln(n);
if hc(n) then write(n,' la so hoan chinh') else write(n,' ko hoan chinh');
readln;
end.

Trả lời nhanh trong 10 phút và nhận thưởng

Đấu trường tri thức +500K

Một số có tổng các số nhỏ hơn nó bằng chính nó được gọi là số hoàn chỉnh VD: 6 có các ước nhỏ hơn là 1 2 3 Tổng là 1 + 2 + 3 = 6 Viết chương trình xét xem một số n được nhập từ bàn phím có phải số hoàn chỉnh không Tin học - Lớp 8 Tin học Lớp 8

Bạn muốn biết điều gì?

GỬI CÂU HỎI

Học tập không giới hạn cùng học sinh cả nước và AI, sôi động, tích cực, trải nghiệm

Câu hỏi mới nhất

Cho AABC vuông tại A. Kẻ trung tuyến AM. Gọi H là trung điểm của AB. Trên tia đối của tia HM lấy điểm N sao cho HN = HM (Toán học - Lớp 8)

1 trả lời

Câu hỏi liên quan

Cho các số thực x, y thỏa mãn (√(x^2 + 1) + x)(√(y^2 + 1) + 1) = 1. CMR x + y = 0 (Toán học - Lớp 9)

2 trả lời

Cho hàm số y = f (x) có đạo hàm f (x) = x (x + 1)(x + 2mx + 5) với mọi x thuộc P (Toán học - Lớp 11)

1 trả lời

Tổng hai số là 312. Số thứ nhất nếu tăng thêm 43 và số thứ hai giảm đi 19 thì số thứ nhất bằng 2/5 số thứ hai. Tìm hai số (Toán học - Lớp 5)

6 trả lời

Hãy miêu tả 1 đoạn văn ngắn về ngôi nhà của em bằng Tiếng Anh (Tiếng Anh - Lớp 6)

34 trả lời

Underline the best form (Tiếng Anh - Lớp 8)

5 trả lời

Hôm nay bạn thế nào? Hãy nhấp vào một lựa chọn, nếu may mắn bạn sẽ được tặng 50.000 xu từ Lazi

Vui	Buồn	Bình thường

Bảng xếp hạng thành viên

01-2025 12-2024 Yêu thích

Trang chủ	Giải đáp bài tập	Đố vui	Ca dao tục ngữ	Liên hệ	Tải ứng dụng Lazi
Giới thiệu	Hỏi đáp tổng hợp	Đuổi hình bắt chữ	Thi trắc nghiệm	Ý tưởng phát triển Lazi
Chính sách bảo mật	Trắc nghiệm tri thức	Điều ước và lời chúc	Kết bạn 4 phương	Xem lịch
Điều khoản sử dụng	Khảo sát ý kiến	Xem ảnh	Hội nhóm	Bảng xếp hạng
Tuyển dụng	Flashcard	DOL IELTS Đình Lực	Mua ô tô	Bảng Huy hiệu
Đấu trường tri thức	Thơ văn danh ngôn	Từ điển Việt - Anh	Đề thi, kiểm tra	Xem thêm

Một số có tổng các số nhỏ hơn nó bằng chính nó được gọi là số hoàn chỉnh. VD: 6 có các ước nhỏ hơn là 1, 2, 3. Tổng là 1 + 2 + 3 = 6. Viết chương trình xét xem một số n được nhập từ bàn phím có phải số hoàn chỉnh không

Cho AABC vuông tại A. Kẻ trung tuyến AM. Gọi H là trung điểm của AB. Trên tia đối của tia HM lấy điểm N sao cho HN = HM (Toán học - Lớp 8)

Tóm tắt người nghĩa phụ ở khoái châu của Nguyễn Dữ (Ngữ văn - Lớp 12)

Lập tất cả các tỷ lệ thức có thể được từ dảng thức sau: (Toán học - Lớp 7)

Sự kiện xoay quanh nhân vật chính trong Người nghĩa phụ ở Khoái Châu của Nguyễn Dữ là gì? (Ngữ văn - Lớp 12)

Nhân vật chính trong chuyện Người nghĩa phụ ở khoái châu của Nguyễn Dữ là ai không (Ngữ văn - Lớp 12)

Cho các số thực x, y thỏa mãn (√(x^2 + 1) + x)(√(y^2 + 1) + 1) = 1. CMR x + y = 0 (Toán học - Lớp 9)

Cho hàm số y = f (x) có đạo hàm f (x) = x (x + 1)(x + 2mx + 5) với mọi x thuộc P (Toán học - Lớp 11)

Tổng hai số là 312. Số thứ nhất nếu tăng thêm 43 và số thứ hai giảm đi 19 thì số thứ nhất bằng 2/5 số thứ hai. Tìm hai số (Toán học - Lớp 5)

Hãy miêu tả 1 đoạn văn ngắn về ngôi nhà của em bằng Tiếng Anh (Tiếng Anh - Lớp 6)

Underline the best form (Tiếng Anh - Lớp 8)

Một số có tổng các số nhỏ hơn nó bằng chính nó được gọi là số hoàn chỉnh. VD: 6 có các ước nhỏ hơn là 1, 2, 3. Tổng là 1 + 2 + 3 = 6. Viết chương trình xét xem một số n được nhập từ bàn phím có phải số hoàn chỉnh không

Đăng nhập

Mở khóa để xem toàn bộ nội dung trả lời