我無法使用ReadAllCars函數讀取記錄數組。我如何才能將Car記錄的所有4個輸入讀入Cars陣列？我不斷收到動態數組錯誤。 type
cars = record
model:String;
year:integer;
end;
car = array of cars;
function readCar(prompt: String): Cars;
begi
我想要顯示所有在特定日期內購買項目的客戶，這是通過使用客戶數組與if/else語句或使用當天的枚舉來完成的嗎？任何幫助或例子都會很棒，謝謝！ type
day = (monday, tuesday);
Tcustomer = record
name:String;
itemPurchased:string;
dayPurchased: Tday;
end;
我做了一些搜索，說它存儲的價值不適合，但我不知道它是如何發生在我的代碼。我檢查了我的代碼很多次，但我仍然得到這個。我做了一些搜索，說它是存儲一個不適合的值，但我不知道它是如何發生在我的代碼中的。我檢查了我的代碼很多次，但我仍然得到這個。 program ACT2;
uses crt;
var
inputs : array[1..5] of integer;
index1
我開始學習帕斯卡爾:)，我有興趣做一種Euromillion ...但是，我不知道如何禁止相同的數字或星星... 我認爲這（下）會解決它...但它沒有...幫助？ Program euromillion;
var num: array [1..5] of integer;
Procedure numbers;
var i, j: integer;
Begin
write ('Di
感謝您提前給予所有幫助。我必須從Pascal開始編程，並且相當誠實地說，Java和Python並不是那麼愉快的變化。我嘗試了一個簡單的程序來返回GCD，但控制檯甚至不會保持打開狀態，儘管在最後還是readln。 program App1Learning;
var
a, b : integer;
begin
read(a);
read(b);
whil
我有包含整數的字符串，它可能比maxInt更爲寬泛，我需要對它們進行比較，那麼最好的辦法是做什麼。 這裏是離我的代碼示例： x := 1;
Reset(File1);
While Not eof(File1) do
Begin
Read(File1, num[i]);
Inc(i)
End;
z := i;
w :