codevs天梯 素數判定 水題

題目描述 Description

質數又稱素數。指在一個大於1的自然數中，除了1和此整數自身外，不能被其他自然數整除的數。

素數在數論中有着很重要的地位。比1大但不是素數的數稱爲合數。1和0既非素數也非合數。質數是與合數相對立的兩個概念，二者構成了數論當中最基礎的定義之一。基於質數定義的基礎之上而建立的問題有很多世界級的難題，如哥德巴赫猜想等。算術基本定理證明每個大於1的正整數都可以寫成素數的乘積，並且這種乘積的形式是唯一的。這個定理的重要一點是，將1排斥在素數集合以外。如果1被認爲是素數，那麼這些嚴格的闡述就不得不加上一些限制條件。

概念

只有1和它本身兩個約數的自然數，叫質數(Prime Number)。（如：由2÷1=2，2÷2=1，可知2的約數只有1和它本身2這兩個約數，所以2就是質數。與之相對立的是合數：“除了1和它本身兩個約數外，還有其它約數的數，叫合數。”如：4÷1=4，4÷2=2，4÷4=1，很顯然，4的約數除了1和它本身4這兩個約數以外，還有約數2，所以4是合數。）
100以內的質數有2，3，5，7，11，13，17，19，23，29，31，37，41，43，47，53，59，61，67，71，73，79，83，89，97，在100內共有25個質數。
注：（1）1既不是質數也不是合數。因爲它的約數有且只有1這一個約數。
（2）2和3是所有素數中唯一兩個連着的數 ．

代碼：

var
  n,i:longint;


begin
  readln(n);
  if n=1 then
    begin
      writeln('\n');
      exit;
    end;
  for i:=2 to n-1 do
    if n mod i=0 then
      begin
        writeln('\n');
        exit;
      end;
  writeln('\t');
end.