關於資訊科技pascal測試資料問題
1樓：間介面卡
奧林匹克競賽每題分為十個測試資料，每個資料梁納10分，也就是每題一共一百分。資料指4個資料滿足什麼要求（比如一些要用高精度的題目這些資料非常小，不橡旦沒用高精度遲碧也能做），而80%表示10個資料中8個滿足他後面說的內容，其中包括了40%的，範圍更大了，也許不用高精度就超時等等。而100％資料告訴你這道題目的範圍，陣列可以開到多少、用longint還是integer都從這裡看。
pascal程式檢測
2樓：無建華
搞不懂樓主是什麼意思？
錯誤：a mod 3=2；
a mod 5=3;
a mod 7=5;
如果這裡是賦值語句的話應該在等號前加個冒號：
但這裡用賦值語句也是錯誤的，因為「a mod 3」並不是乙個變數；
我認為這裡應該是if語句，程式的要求應該是把100到199中除以3餘2的數，除以5餘3的數和。
除以7餘5的數都輸出來吧··
如果是的話程式如下：
program a1;
var a:integer;
beginfor a:=100 to 199 do
if (a mod 3=2)or(a mod 5=3)or(a mod 7=5) then writeln(a);
end.
3樓：pascal博士
我將程式修改了一下，希望樓主採納；
program a1；
vara:integer;
beginfor a:=100 to 199 do
beginif (a mod 3 =2)and(a mod 5 =3)and(a mod 7=5) then
writeln(a);
end;end.
4樓：網友
program a1;
vara:integer;
beginfor a:=100 to 199 do
beginif (a mod 3 =2)and(amod 5 =3)and(a mod7=5) then
writeln(a);
end;end.
像a mod 3=2之類的只是乙個布林表示式，只返回乙個布林值。
深海探測之類的問題
5樓：網友
好像中國只有深海遠洋吧。
現在還在開會。
pascal的測試資料怎麼用？
6樓：網友
你先把輸入、輸入檔案分別設定為：
如：資料夾的檔案為 和。
你就將你的輸出輸入檔案設定為 和。
接著，編譯程式，使檔案和批處理和測試資料檔案在乙個資料夾。
執行批處理檔案。接著，它會幫你計算出分數。
cpu速度問題！進！！我用pascal寫了個程式，然後測試
7樓：網友
一般來說，ghost封裝的會有製作者加進去的外掛程式或者工具一類的東西，系統並不是純淨的。而安裝版的這些東西要少的多，要看你自己裝不裝。這些封裝進去的東西有可能開機就執行了，或者是使某些服務時開啟的，雖然只消耗很小的資源，但是還是存在對cpu的佔用。
所以你用安裝版的系統cpu在計算的時候就顯得快些。
不過話說回來，你快了這麼1秒也沒什麼意義。
8樓：淮安博愛**
改版系統未必快啊，改版系統只是給你做了驅動方面不需要煩，常用軟體方面不需要煩這些工作，但是對應的也塞了一大堆東西進去，系統的狀態當然不可能很好，更沒法跟純淨安裝的xp優化以後比，你光對比一下系統空載的時候的記憶體佔用和登錄檔檔案大小就可以看出來了，這種程式通常不是吃cpu的，主要還是看記憶體。
9樓：x海桂專用
-_-lz那麼閒，時間看得真準```關於影響電腦速度的：
1.系統垃圾（這裡垃圾指的是垃圾堆的意思，而不是你的系統很爛，-_
2.防毒軟體佔用資源，影響cpu的使用率。
3.系統硬體。
4.應用軟體過多。
5.病毒等等。
當然病毒是不可能了···
pascal中測定時間的演算法
10樓：網友
在free pascal裡還可以這樣。
uses sysutils;
var t1:tdatetime;
i,j,k:longint;
begint1:=now;
while true do
beginif (now-t1)*86400>3 thenbegin
break;
end;end;
end.注：在比賽時不能這樣是使用uses sysutils庫鄙視抄答案者！！
11樓：網友
freepascal中是無法獲得時間的，這個只能在turbopascal中使用。
12樓：揭綺波
38freepascal中是無法獲得時間的，這個只能在turbopascal中使用。
而free pascal不能用meml訪問記憶體所有就會編譯失敗。
如果你實在想知道時間可以用乙個擴充套件的get函式，但是很麻煩、很慢。所有在比oi裡基本不會用到時間的操作。
你要想測執行時間可以用cena等測試工具。
13樓：網友
freepascal 及其以上版本）和delphi都無法使用，但是一下版本可以(建議使用freepascal for noi）.
14樓：網友
meml[64:108] 這樣就可用freepascal了，freepascal記憶體是沒話說的，建議還是用freepascal
15樓：在沙漠裡灌水
到這裡看看，好像有解釋。
Pascal 中的閏年題目
n n repeat now now if now mod and now mod or now mod then s s until s n 這是我的基本思路，每次改現在年份加，為閏年就用變數s ，符合要求時輸出now。大致思路嗎？是這樣的 可以用迴圈語句 執行閏年特徵的操作 閏年這一年月天，那麼...
一道pascal題目
給你核心 吧,這是判斷兩個數是否是親密數對的函式 function main a,b longint boolean vari,s1,s2 longint begin if a b then exit false s1 0 s2 0 for i 1 to a 1 do if a mod i 0 th...
pascal語言字串題目
1.program sdf var a string s,i,j longint begin readln a while a do begin s 0 j 0 for i 1 to length a doif a i in 0 9 then j j 10 ord a i ord 0 else be...