Viết Chương Trình Kiểm Tra 1 Số Có Phải Là Số Hoàn Hảo Hay Không?

Có thể bạn quan tâm

YOMEDIA NONE Trang chủ Hỏi đáp lớp 8 ADMICRO Viết chương trình kiểm tra 1 số có phải là số hoàn hảo hay không?

viết chương trình khiểm tra 1 số có phải là số hoàn hảo hay không và đưa ra câu trả lời tương ứng

Theo dõi Vi phạm ATNETWORK

Trả lời (1)

Var i,n:integer;

t:real;

Begin

Repeat

Write (' nhap n =');

Readln(n);

Until n>1;

t:=0;

For i:= 1 to n-1 do If n mod i = 0 then t:=t+i;

If t=n then Writeln (n,' la so hoan hao ')

else (n,'khong phai la so hoan hao ');

Readln;

end.
bởi Nguyen Lynn 08/12/2018 Like (0) Báo cáo sai phạm

Cách tích điểm HP

Nếu bạn hỏi, bạn chỉ thu về một câu trả lời. Nhưng khi bạn suy nghĩ trả lời, bạn sẽ thu về gấp bội!

Lưu ý: Các trường hợp cố tình spam câu trả lời hoặc bị báo xấu trên 5 lần sẽ bị khóa tài khoản

Gửi câu trả lời Hủy

NONE

Các câu hỏi mới

Viết chương trình Pascal nhập số n từ bàn phím. Xuất ra màn hình:

+ Các ước của n

+ Số lượng các ước của n

+ Tổng các ước của n

+ Xét tổng đó có phải là số hoàn hảo?

29/11/2022 | 0 Trả lời
Viết chương trình nhập vào chiều, chiều rông hình chữ nhật và nhập vào cạnh của hình vuông. Thông báo ra màn hình diện tích hình nào lớn hơn.

Viết chương trình nhập vào chiều, chiều rông hình chữ nhật và nhập vào cạnh của hình vuông. Thông báo ra màn hình diện tích hình nào lớn hơn.

30/11/2022 | 0 Trả lời
Viết chương trình nhập 3 số a,b,h hãy biết só lớn nhất trong 3 số đó

vViết chương trình nhập 3 số a,b,h hãy biết só lớn nhất trong 3 số đó

07/12/2022 | 0 Trả lời
viết chương trình nhập vào hai số a,b .kiểm tra xem a ,b là số âm hay dương,chẳn hay lẻ.kiểm tra xem a có chia hết cho b hay không.kiểm tra xem a,b có chia hết cho 3 hay không

viết chương trình nhập vào hai số a,b .kiểm tra xem a ,b là số âm hay dương,chẳn hay lẻ.kiểm tra xem a có chia hết cho b hay không.kiểm tra xem a,b có chia hết cho 3 hay không

07/12/2022 | 0 Trả lời
Tìm input, output và mô tả thuật toán bài sau: xác định một số tự nhiên x bất kì để chứng minh là số chẵn không?

Tìm input, output và mô tả thuật toán bài sau: xác định một số tự nhiên x bất kì để chứng minh là số chẵn không?

09/12/2022 | 0 Trả lời
Viết chương trình Pascal nhập số từ bàn phím. Xuất ra màn hình:

+ Tính n!

+ Nhập số x từ bàn phím.Tính nx

14/12/2022 | 0 Trả lời
Viết chương trình giải phương trình bậc nhất ax=b. Với a, b nhập từ bàn phím.

viết chương trình giải phương trình bậc nhất ax=b.Với a,b nhập bằng bàn phím Tin

17/12/2022 | 0 Trả lời
Cho x và y là 2 độ dài 2 cạnh của một hình chữ nhật. Viết chương trình so sánh 2 giá trị x, y và thông báo nó là hình vuông hay hình chữ nhật thường.

Cho x và y là 2 độ dài 2 cạnh của một hình chữ nhật. Viết chương trình so sánh 2 giá trị x, y và thông báo nó là hình vuông hay hình chữ nhật thường

18/12/2022 | 0 Trả lời
Tại sao nguười ta không viết chương trình bằng ngôn ngữ máy?

tại sao nguười ta không viết chương trình bằng ngôn ngữ máy?

19/12/2022 | 0 Trả lời
Nêu cú pháp khai báo biến cho ví dụ khai báo bến trong pascal?

cú pháp khai báo biến cho ví dụ khai báo bến trong pascal

20/12/2022 | 0 Trả lời
Xác định bài toán input output của bài toán tính quãng đường tào hỏa đi được trong thời gian t vận tốc v?
tính quãng đường tào hỏa đi được trong thời gian t vận tốc v
21/12/2022 | 0 Trả lời
Em hãy xác định INPUT, OUTPUT và mô tả thuật toán của bài toán nhập vào 2 số nguyên dương a, b và in ra kết quả số a nếu a lớn hơn b và ngược lại in kết quả b. (Ví dụ : nhập 20, 9 in ra 20 ngược lại nhập 9,20 in ra 20).

Em hãy xác định INPUT, OUTPUT và mô tả thuật toán của bài toán nhập vào 2 số nguyên dương a, b và in ra kết quả số a nếu a lớn hơn b và ngược lại in kết quả b. (Ví dụ : nhập 20, 9 in ra 20 ngược lại nhập 9,20 in ra 20).

25/12/2022 | 0 Trả lời
Viết chương trình hoàn chỉnh sử dụng câu lệnh điều kiện thực hiện nhập từ bàn phím giá trị của biến nguyên a và kiểm tra nếu a là số lẻ thì tính và in ra màn hình diện tích hình vuông với độ dài cạnh là 2a không thì đi tính chu vi hình vuông với độ dài cạnh là 2a? Mô tả lại thuật toán giải bài toán.

Viết chương trình hoàn chỉnh sử dụng câu lệnh điều kiện thực hiện nhập từ bàn phím giá trị của biến nguyên a và kiểm tra nếu a là số lẻ thì tính và in ra màn hình diện tích hình vuông với độ dài cạnh là 2a không thì đi tính chu vi hình vuông với độ dài cạnh là 2a?

Mô tả lại thuật toán giải bài toán trên

28/12/2022 | 0 Trả lời
Viết chương trình nhập vào một số nguyên a bất kỳ. Kiểm tra xem số a là số chẵn hay số lẻ. Nếu là số chẵn, tăng giá trị của a thêm 10 đơn vị; Nếu là số lẻ, giảm giá trị của a 10 đơn vị.

Viết chương trình nhập vào một số nguyên a bất kỳ. Kiểm tra xem số a là số chẵn hay số lẻ. Nếu là số chẵn, tăng giá trị của a thêm 10 đơn vị; Nếu là số lẻ, giảm giá trị của a 10 đơn vị.

30/12/2022 | 0 Trả lời
Viết chương trình tính công thức: C=2/3*3/4*4/5....*n/n+1 (n>0)

viết công thức tính C=2/3*3/4*4/5....*n/n+1 (n>0)

31/01/2023 | 0 Trả lời
Viết chương trình tính tổng: S=1+3+5+...+999

Viết chương trình tính tổng: S=1+3+5+...+999

09/02/2023 | 0 Trả lời
Viết chương trình tính tổng sau:

S=1+1/2^2+1/3^2+...+1/n^2. Trong đó N là một số nguyên được nhập vào từ bàn phím. S là tổng các phân số từ 1 đến n, sau khi tính toán tổng S được xuất ra màn hình.

09/02/2023 | 0 Trả lời
Sử dụng câu lệnh lặp để viết chương trình tính tổng 1x2+2x3+3x4+...+n(n+1).

Sử dụng câu lệnh lặp để viết chương trình tính tổng 1x2+2x3+3x4+...+n(n+1)

24/02/2023 | 0 Trả lời
Viết chương trình tính tổng S=1+2+3+.... đến khi S lớn hơn 250 thì dừng. In ra màn hình giá trị tổng S vừa tính và cho biết giá trị cuối cùng được cộng là bao nhiêu?

Viết chương trình tính tổng S=1+2+3+.... đến khi S lớn hơn 250 thì dừng. In ra màn hình giá trị tổng S vừa tính và cho biết giá trị cuối cùng được cộng là bao nhiêu?

05/03/2023 | 0 Trả lời
Viết chương trình nhập vào 4 số tự nhiên và sắp xếp sau đó in ra màn hình kết quả.

Viết chương trình nhập vào 4 số tự nhiên và sắp xếp sau đó in ra màn hình kết quả.

09/03/2023 | 0 Trả lời
Cho dãy n số nguyên tính tổng các phần tử của dãy và cho biết phần tử nào lớn nhất trong dãy. Hãy viết chương trình bằng pascal?

cho dãy n số nguyên tính tổng các phần tử của dãy và cho biết phần tử nào lớn nhất trong dãy. Hãy viết chương trình bằng pascal?

28/03/2023 | 0 Trả lời
Viết chương trình nhập vào 4 số sau đó sắp xếp theo thứ tự từ bé đến lớn?

Viết chương trình nhập vào 4 số sau đó sắp xếp theo thứ tự từ bé đến lớn?

05/04/2023 | 0 Trả lời
Sau khi thực hiện đoạn chương trình sau:

S:=1; For i:=1 to 5 do S:=S*i;

Giá trị của biến S bằng bao nhiêu?

A. 120

B. 55

C. 121

D. 151

12/04/2023 | 0 Trả lời
Viết chương trình pascal nhập hai số a;b (a>0 ; b>0) xuất ra màn hình các số chính phương từ a-b.

Viết chương trình pascal nhập hai số a;b (a>0 ; b>0) xuất ra màn hình các số chính phương từ a-b.

12/04/2023 | 0 Trả lời
Viết chương trình sử dụng biến mảng để nhập từ bàn phím các phần tử của một dãy số nguyên độ dài của dãy cũng được nhập từ bàn phím in ra màn hình tổng các giá trị là số lẻ.

viết chương trình sử dụng biến mảng để nhập từ bàn phím các phần tử của một dãy số nguyên . độ dài của dãy cũng đc nhập từ bàn phím .in ra màn hình tổng các giá trị là số lẻ

14/04/2023 | 0 Trả lời

ADSENSE ADMICRO UREKA AANETWORK

XEM NHANH CHƯƠNG TRÌNH LỚP 8

Toán 8

Toán 8 Kết Nối Tri Thức

Toán 8 Chân Trời Sáng Tạo

Toán 8 Cánh Diều

Giải bài tập Toán 8 KNTT

Giải bài tập Toán 8 CTST

Giải bài tập Toán 8 Cánh Diều

Trắc nghiệm Toán 8

Ngữ văn 8

Ngữ Văn 8 Kết Nối Tri Thức

Ngữ Văn 8 Chân Trời Sáng Tạo

Ngữ Văn 8 Cánh Diều

Soạn Văn 8 Kết Nối Tri Thức

Soạn Văn 8 Chân Trời Sáng Tạo

Soạn Văn 8 Cánh Diều

Văn mẫu 8

Tiếng Anh 8

Tiếng Anh 8 Kết Nối Tri Thức

Tiếng Anh 8 Chân Trời Sáng Tạo

Tiếng Anh 8 Cánh Diều

Trắc nghiệm Tiếng Anh 8 KNTT

Trắc nghiệm Tiếng Anh 8 CTST

Trắc nghiệm Tiếng Anh 8 Cánh Diều

Tài liệu Tiếng Anh 8

Khoa học tự nhiên 8

Khoa học tự nhiên 8 KNTT

Khoa học tự nhiên 8 CTST

Khoa học tự nhiên 8 Cánh Diều

Giải bài tập KHTN 8 KNTT

Giải bài tập KHTN 8 CTST

Giải bài tập KHTN 8 Cánh Diều

Trắc nghiệm Khoa học tự nhiên 8

Lịch sử và Địa lý 8

Lịch sử & Địa lí 8 KNTT

Lịch sử & Địa lí 8 CTST

Lịch sử & Địa lí 8 Cánh Diều

Giải bài tập LS và ĐL 8 KNTT

Giải bài tập LS và ĐL 8 CTST

Giải bài tập LS và ĐL 8 Cánh Diều

Trắc nghiệm Lịch sử và Địa lí 8

GDCD 8

GDCD 8 Kết Nối Tri Thức

GDCD 8 Chân Trời Sáng Tạo

GDCD 8 Cánh Diều

Giải bài tập GDCD 8 KNTT

Giải bài tập GDCD 8 CTST

Giải bài tập GDCD 8 Cánh Diều

Trắc nghiệm GDCD 8

Công nghệ 8

Công Nghệ 8 KNTT

Công Nghệ 8 CTST

Công Nghệ 8 Cánh Diều

Trắc nghiệm Công Nghệ 8

Giải bài tập Công Nghệ 8 KNTT

Giải bài tập Công Nghệ 8 CTST

Giải bài tập Công Nghệ 8 CD

Tin học 8

Tin Học 8 Kết Nối Tri Thức

Tin Học 8 Chân Trời Sáng Tạo

Trắc nghiệm Tin học 8

Giải bài tập Tin học 8 CD

Tin Học 8 Cánh Diều

Cộng đồng

Hỏi đáp lớp 8

Tư liệu lớp 8

Xem nhiều nhất tuần

Đề thi giữa HK2 lớp 8

Đề thi HK2 lớp 8

Đề thi HK1 lớp 8

Đề thi giữa HK1 lớp 8

Đề cương HK1 lớp 8

9 bài văn mẫu Cô bé bán diêm hay nhất

Tiếng Anh Lớp 8 Unit 7

Tiếng Anh Lớp 8 Unit 8

Video Toán Nâng cao lớp 8- HK1

Video Toán Nâng cao lớp 8- HK Hè

Video Toán Nâng cao lớp 8- HK2

YOMEDIA YOMEDIA ×

Thông báo

Bạn vui lòng đăng nhập trước khi sử dụng chức năng này.

Bỏ qua Đăng nhập ×

Thông báo

Bạn vui lòng đăng nhập trước khi sử dụng chức năng này.

Đồng ý ATNETWORK ON

QC Bỏ qua >>

Từ khóa » Thuật Toán Tìm Số Hoàn Hảo Trong Pascal

Trả lời (1)

Các câu hỏi mới

Viết chương trình Pascal nhập số n từ bàn phím. Xuất ra màn hình:

Viết chương trình nhập vào chiều, chiều rông hình chữ nhật và nhập vào cạnh của hình vuông. Thông báo ra màn hình diện tích hình nào lớn hơn.

Viết chương trình nhập 3 số a,b,h hãy biết só lớn nhất trong 3 số đó

viết chương trình nhập vào hai số a,b .kiểm tra xem a ,b là số âm hay dương,chẳn hay lẻ.kiểm tra xem a có chia hết cho b hay không.kiểm tra xem a,b có chia hết cho 3 hay không

Tìm input, output và mô tả thuật toán bài sau: xác định một số tự nhiên x bất kì để chứng minh là số chẵn không?

Viết chương trình Pascal nhập số từ bàn phím. Xuất ra màn hình:

Viết chương trình giải phương trình bậc nhất ax=b. Với a, b nhập từ bàn phím.

Cho x và y là 2 độ dài 2 cạnh của một hình chữ nhật. Viết chương trình so sánh 2 giá trị x, y và thông báo nó là hình vuông hay hình chữ nhật thường.

Tại sao nguười ta không viết chương trình bằng ngôn ngữ máy?

Nêu cú pháp khai báo biến cho ví dụ khai báo bến trong pascal?

Xác định bài toán input output của bài toán tính quãng đường tào hỏa đi được trong thời gian t vận tốc v?

Em hãy xác định INPUT, OUTPUT và mô tả thuật toán của bài toán nhập vào 2 số nguyên dương a, b và in ra kết quả số a nếu a lớn hơn b và ngược lại in kết quả b. (Ví dụ : nhập 20, 9 in ra 20 ngược lại nhập 9,20 in ra 20).

Viết chương trình nhập vào một số nguyên a bất kỳ. Kiểm tra xem số a là số chẵn hay số lẻ. Nếu là số chẵn, tăng giá trị của a thêm 10 đơn vị; Nếu là số lẻ, giảm giá trị của a 10 đơn vị.

Viết chương trình tính công thức: C=2/3*3/4*4/5....*n/n+1 (n>0)

Viết chương trình tính tổng: S=1+3+5+...+999

Viết chương trình tính tổng sau:

Sử dụng câu lệnh lặp để viết chương trình tính tổng 1x2+2x3+3x4+...+n(n+1).

Viết chương trình tính tổng S=1+2+3+.... đến khi S lớn hơn 250 thì dừng. In ra màn hình giá trị tổng S vừa tính và cho biết giá trị cuối cùng được cộng là bao nhiêu?

Viết chương trình nhập vào 4 số tự nhiên và sắp xếp sau đó in ra màn hình kết quả.

Cho dãy n số nguyên tính tổng các phần tử của dãy và cho biết phần tử nào lớn nhất trong dãy. Hãy viết chương trình bằng pascal?

Viết chương trình nhập vào 4 số sau đó sắp xếp theo thứ tự từ bé đến lớn?

Sau khi thực hiện đoạn chương trình sau:

Viết chương trình pascal nhập hai số a;b (a>0 ; b>0) xuất ra màn hình các số chính phương từ a-b.

Viết chương trình sử dụng biến mảng để nhập từ bàn phím các phần tử của một dãy số nguyên độ dài của dãy cũng được nhập từ bàn phím in ra màn hình tổng các giá trị là số lẻ.