Tin học Tin học 8- Câu lệnh lặp

[minhtam8a2@gmail.com]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

Viết chương trình bằng lập trình Pascal
1/ Số hoàn hảo là những số bằng tổng các ước thực sự của nó. Hãy viết chương trình tìm các số hoàn hảo nhỏ hơn 1000
Ví dụ: 6 là số hoàn hảo vì 6=1+2+3
2/ Hai số tự nhiên m và n được gọi là hai số bạn bè nếu tổng các ước thực sự của m bằng n và ngược lại, tổng các ước của n bằng m. Hãy viết thuật toán tìm các cặp số bạn bè nhỏ hơn số n cho trước.
Ví dụ 284 và 220 là cặp số bạn bè vì tổng các ước thực sự của 24 bằng 220 và ngược lại, tổng các ước thực sự của 220 băng 284.

 

[quân pro]

Viết chương trình bằng lập trình Pascal
1/ Số hoàn hảo là những số bằng tổng các ước thực sự của nó. Hãy viết chương trình tìm các số hoàn hảo nhỏ hơn 1000
Ví dụ: 6 là số hoàn hảo vì 6=1+2+3
2/ Hai số tự nhiên m và n được gọi là hai số bạn bè nếu tổng các ước thực sự của m bằng n và ngược lại, tổng các ước của n bằng m. Hãy viết thuật toán tìm các cặp số bạn bè nhỏ hơn số n cho trước.
Ví dụ 284 và 220 là cặp số bạn bè vì tổng các ước thực sự của 24 bằng 220 và ngược lại, tổng các ước thực sự của 220 băng 284.

Mình đưa cách làm nhá :>
----------------------------------------
1)
tạo int tổng để lưu tổng ước
tạo 2 vòng lặp:
for (int i = 1; i < 1000; i++)
{
for (int j = 1; j < i; j++)
{ Nếu (i chia hết cho j) thì tổng += j }

Nếu i bằng tổng thì xuất i ra

tổng bằng 0
}

 

[Duy Quang Vũ 2007]

1/


2/ Bạn sử dụng hàm tìm tổng ước số trên và kiểm tra các đk Tong_uocso(m)=n and Tong_uocso(n)=m.

 

[hoàng việt nam]

Mình đưa cách làm nhá :>
----------------------------------------
1)
tạo int tổng để lưu tổng ước
tạo 2 vòng lặp:
for (int i = 1; i < 1000; i++)
{
for (int j = 1; j < i; j++)
{ Nếu (i chia hết cho j) thì tổng += j }

Nếu i bằng tổng thì xuất i ra

tổng bằng 0
}

Anh ơi bạn ấy cần pascal chứ ko cần C++ anh ạ.

 

[Sakura Futaba]

1/
View attachment 177770

2/ Bạn sử dụng hàm tìm tổng ước số trên và kiểm tra các đk Tong_uocso(m)=n and Tong_uocso(n)=m.

Anh nhớ lớp 8 đã sử dụng đến chương trình con đâu nhỉ?

 

[Duy Quang Vũ 2007]

Anh nhớ lớp 8 đã sử dụng đến chương trình con đâu nhỉ?

Tách cho dễ hiểu thôi, cho vào chương trình chính cũng được mà.

 

[Sakura Futaba]

Tách cho dễ hiểu thôi, cho vào chương trình chính cũng được mà.

Không anh chỉ nghi vấn tôi vì được năm rồi chưa code lại pascal lên chưa hiểu cái đề nó hỏi gì-_-"