帕斯卡語言的問題，聰明人的問題

var a:real;

beginread(a);

write(a);

write(trunc(a));

write(a-trunc(a));

write(round(a));

end.如果你有乙個小數截斷的函式，如果你不讓它被使用，它就沒用。

我有時間做剩下的事情，等等

陣列的功能：方便資料的記錄，例如：

如果我們想讀取 10 個數字，如果我們不使用陣列，那麼我們需要開啟 10 個變數，例如 a1、a2、a3、a4......a10。

同樣，如果你想讀取100個數字，你必須開啟100個變數。

陣列可以很容易地儲存和使用;

例如，a：array[1..100] of longint/integer;

陣列的作用：

它用於記錄、儲存、修改和輸出資料（可以很大）;

二樓型別相同，角色不一定要相同;

用法：當您需要第 i 個資料時，您定義的陣列是 a[i] a[i] a[i] 等價於整數或長整數。

對於 pascal 的所有函式，只需記住一些常見的函式，例如：

inc(a);dec(a); ord(ch/string);chr(a);fillchar（a，sizeof（a），k）（括號內為變數）等。

如果你想在它們後面列出所有不同的教程，那麼將它們一一列出太痛苦了

迴圈語句： for ： for i：=p to q do begin .end;其中 i、p、q 是（長）整數;

while：如果滿足此條件，則條件執行，否則跳出。 begin

end;repeat: repeat

直到條件; 如果滿足條件，我會跳出來執行其他操作。

while repeat 的主要區別在於 while 是先判斷後做，重複是先做後判斷;

而滿足於做，否則跳過;

重複不滿足於做，滿足逃避;

這三個是最常用的。

也主要是這三種迴圈宣告;

唉，筋疲力盡——

另外，恐怕在二樓這樣複製貼上不好