Tin học Viết chương trình lặp

[YenVy2004]

[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 in ra ước của một số tự nhiên N được nhập từ bàn phím.
Help me!

 

[Khánh Huyền_22]

Program uoc;
Usr crt;
Var n,i:integer;
Begin
Clrscr;
Write('Nhap N: '); Readln(n);
For i:= 1 to n do if n mod i=0 then write (i,' ');
Readln
End.

 

[Sơn Nguyên 05]

Program uoc;
Usr crt;
Var n,i:integer;
Begin
Clrscr;
Write('Nhap N: '); Readln(n);
For i:= 1 to n do if n mod i=0 then write (i,' ');
Readln
End.

Có cần chi i chạy từ 1 đến n không bạn nhỉ!

 

[Khánh Huyền_22]

Có cần chi i chạy từ 1 đến n không bạn nhỉ!

Cần chứ, vòng lặp mà bạn

 

[Sơn Nguyên 05]

Tuy nhiên khi tìm các ước của n ta chỉ cần tìm đến n/2 thôi mà

Cần chứ, vòng lặp mà bạn[/QUOTEìm ước của n ta chỉ cần xét đến n/2 thôi. Khi đó vòng lặp ngắn hơn.

 

[Khánh Huyền_22]

Tuy nhiên khi tìm các ước của n ta chỉ cần tìm đến n/2 thôi mà

Mình làm như vậy và hỏi cô thì cô nói đúng rồi

 

[Sơn Nguyên 05]

Mình làm như vậy và hỏi cô thì cô nói đúng rồi

Chương trình của bạn đúng nhưng chưa tối ưu, vì vòng lặp sẽ dài hơn do vậy sẽ tốn thời gian và dung lượng hơn!

 

[Khánh Huyền_22]

Chương trình của bạn đúng nhưng chưa tối ưu, vì vòng lặp sẽ dài hơn do vậy sẽ tốn thời gian và dung lượng hơn!

Nhưng n vẫn là ước của n mà, giống như 11 vẫn là ước của 11 đó thôi. Vậy nên phải chạy từ 1 đến n chứ

 

[Sơn Nguyên 05]

Nhưng n vẫn là ước của n mà, giống như 11 vẫn là ước của 11 đó thôi. Vậy nên phải chạy từ 1 đến n chứ

Vâng. Tớ nghĩ là bạn có thể nên tìm hiểu thêm!