關於帕斯卡的乙個新手問題來自大師

1.你不認為你在打字。

2.“a>b>c”不應該用帕斯卡寫，它應該寫成（a>b）和（a>c）。

3.你在這個程式中也有乙個漏洞，如果有兩個相同的數字怎麼辦？ 應該把">"更改為">="

4.最好把輸出中的三個數字開啟，中間留個空格，實數的輸出比較長，很難一起看。

5.其實你可以選擇改變方法，你已經用盡了所有的大小可能性，最好比較一下，如果a=b）and（b>=c）那麼writeln（a，" ",b," ",c);

if (a>=c)and(c>=b) then writeln(a," ",c," ",b);

if (b>=a)and(a>=c) then writeln(b," ",a," ",c);

if (b>=c)and(c>=a) then writeln(b," ",c," ",a);

if (c>=a)and(a>=b) then writeln(c," ",a," ",b);

if (c>=b)and(b>=a) then writeln(c," ",b," ",a);

end.

program san ge shu pai xuconstn=3

vara:array[1..n]of integer;

i,j,k,f:integer;

beginwrite('shu ru yi ge shu');

read(a[i];

end;readln;

for i:=1 to n do

write(a[i]);

writeln;

for i:=1 to n-1 do

beginf=0;

for j:=1 ton-1 do

if a[j]>a[j+1] then begink:=a[j];

a[j]:=a[j+1];

a[j+1]:=k;

f:=1;end

if f=0 then i:=n-1;

end;for i:=1 to n do

write(a[i],' ');

end.四樓不如使用案例語句，太複雜了，如果房東沒有學會迴圈和陣列，那就用案例吧！ （以上由小到大，自行更改）。

開始和結束呢？

a>b>c 應替換為 （a>b）和 （b>c），依此類推。

在PACAL中沒有連續的比較。

a>b>c 可以更改為 （a>b） 和 （b>c），依此類推。

關於閱讀的問題......

您可以想象讀入箭頭的存在。

read 是掃瞄此輸入然後停止在那裡的箭頭。

如果 readln（x）; 更改為 read（x） 應該不是問題。

你應該看看它是否在其他地方，或者......是否有問題輸入最後乙個讀物; 目的是在輸出螢幕上停止。

readln;對輸出沒有影響。

在FP中。 完全可以刪除 readln; 更改執行程式後，按 alt+f5 檢視輸出。

這是。 帕斯卡語言。

中的簡明用法。

因為之後如果應該是乙個。

布林。 而leep就是這樣。

布林。 變數。

儲存是： 布林。

所以 ifleep 等價於 if

leep=true

就是這樣

1） read 和 readln 的區別在於：

讀不管是否斷行，它都會按照從左到右的順序讀取資料，如果要讀取的資料數量不匹配，它會繼續讀取，如果讀了行，它會自動換行繼續讀取，當然， 它還將省略要讀取的資料之外的額外資料。

readln 是讀取本語句當前行要讀取的資料，當該行讀取完所有資料時，會自動省略該行的其他資料，如果不讀取，也會自動換行讀取資料，讀取完成後， 它將自動轉到下一行以執行下一條語句。

2）最後讀物的作用。

方便您檢查結果，當程式完成後，由於此語句，它將停留在輸出螢幕上。

3） 當 if 後跟布林型別時。所以。 if

變數 = true' 也可以省略為 'if

變數。 同樣地。

如果變數 = false'

它也可以省略。 ifnot

變數“then”和 else 的格式保持不變。

我也是新兵。 希望！

實際上，這是按堆和子彈堆的操作。 只要符合堆疊的順序，就是可行的，否則就不可行。