?? prime.pas
字號(hào):
//find prime number between s to b
program
integer s ,b
begin
procedure findPrime(integer small,big)
integer i,j,k,c,t
begin
i:=small;
for i from small to big
do
j:=2;
if(i>=3) then
k:=i/2+1;
c:=0;
for j from 2 to k
do
if i=(i/j)*j then //由于沒有提供取余運(yùn)算,只能這樣了~_~
c:=c+1
end
end;
if c=0 then
write i
end
end
end
end
read s;
read b;
call findPrime s b
end.
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -