解題思路:
首先用篩數法把
50000
以內的質數篩出來,然後用迴圈求出它最小的質數因數,再用讀入的
n除以這個數即是答案。
程式:const
maxn=50000;
varf:array[1..maxn] of boolean;
n,i,j:longint;
begin
readln(n);
fillchar(f,sizeof(f),true);
for i:=2 to trunc(sqrt(maxn)) do
if f[i] then for j:=2 to maxn div i do
f[i*j]:=false;
for i:=2 to maxn do
if f[i]and(n mod i=0) then begin writeln(n div i); halt; end;
end.
版權屬於: chris
2023年分割槽聯賽普級組第四題
解題思路 先讀入資料,然後用二維數組建乙個圖,用 dijkstra 演算法,求最短路,如果有答案就輸出,不然就輸出 1。程式 const maxn 100 var a,b array 1.maxn,1.maxn of longint v array 1.maxn of boolean d,f,pre...
2023年分割槽聯賽普級組第二題 尋寶
解題思路 先讀入資料,用三個陣列分別儲存每間房牌子上的數字 每間房可不可以通往上層和每層樓有多少個可以通往上層的房,然後用迴圈模擬,先加上該房間裡牌子上的數,然後用 repeat 模擬在該層樓轉圈。最後輸出 ans mod 20123 的值即可。程式 const maxn 10000 maxm 10...
2023年分割槽聯賽普級組之一 不
description 津津上初中了。媽媽認為津津應該更加用功學習,所以津津除了上學之外,還要參加媽媽為她報名的各科複習班。另外每週媽媽還會送她去學習朗誦 舞蹈和鋼琴。但是津津如果一天上課超過八個小時就會不高興,而且上得越久就會越不高興。假設津津不會因為其它事不高興,並且她的不高興不會持續到第二天。...