Pascal【入门】任意输入一正整数N，要求把它拆成质因子的乘积。

最新推荐文章于 2024-05-31 09:00:00 发布

原创最新推荐文章于 2024-05-31 09:00:00 发布 · 3.1k 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

# 信息学奥林匹克竞赛pascal语言入门

本文介绍了一个简单的质因数分解算法，该算法可以接收任意正整数N，并输出其所有质因子。通过示例演示了如何使用Pascal语言实现这一算法，包括读取输入、进行分解并打印出结果。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

题目描述：

任意输入一正整数N，求出它的所有质因子。如：10＝（2*5）；20=（2*2*5）。

输入：

输入只有一行，包括1个整数。

输出：

输出只有一行，各质因子以一个空格隔开。

样例输入：

样例输出：

2 2 3 3

代码实现：

var n,k,i:longint;
begin
         readln(n);
         k:=n;
         while k>1 do
             for i:=2 to n do
                 if k mod i=0 then 
                 begin
                     write(i,' ');
                     k:=k div i;
                     break;
                 end;
end.