Cho một số tự nhiên n hãy viết chương trình phân tích thành các thừa số nguyên tố đó

0 bình luận về “Cho một số tự nhiên n hãy viết chương trình phân tích thành các thừa số nguyên tố đó”

1. QLinkVN trả lời câu hỏi của bạn như sau:
   Program QLinkVN;
   var n,i: integer;
   Begin
   clrscr;
   Write(‘Nhap so: ‘); Readln(n);
   i:=2;
   Write(‘Ket qua phan tich:’); Write(n,’=’);
   While n>1 do
   Begin if n mod i = 0 then
   Begin Write(i,’.’);
   n:= n div i End else i:=i+1;
   End;
   Readln;
   End.

   Bình luận