напевно йому ; в першому рядку не подобається

Така сама помилка з кожною програмою.

program Apples;

var
  A, B, C: uint64;
  T, i: word;

begin
  readln(T);
end.

Він в тілі використовується

mshcherba, спробуйте скопіювати мій код до себе в ІДЕ

program Commerce;
var
    A, B, C, N, Z: integer;
begin
    read(N);
    A := N - 1;
    B := N - 2;
    C := N - 3;
    while C > 0 do
    begin
    Z := Z + C;
    dec(A);
    B := A - 1;
    if A + B > N then
    C := A + B - N
    else break;
    end;
    writeln(Z)
end.

Те саме

В мене на Pascal.ABC працює, може спробуйте перевстановити... І ще, це щойно скачано і не працює чи воно працювало а лише зараз таке робить?

Може буде з офіційного сайту http://pascalabc.net/ssyilki-dlya-skachivaniya

Може порадите з якого саме посилання скачувати, бо там їх багато. У мене Vista.

Без слова 'program' - те саме.

mshcherba
Спробуйте додати PascalABC в виключення вашого антивіруса. Можливо він намагається сканувати, що ви там компілюєте і цим заважає Паскалю.