какое значение примет переменная x после выполнения следующего фрагмента программы?
А:=0 ; Х:=0
for i:=1 to 10 do
begin
A:=А+3
A:=Х+А
end

Есть там ошибка или нет - это может решить только автор вопроса.

во фрагменте ошибки - нет ';'А:=0 ; Х:=0; for i:=1 to 10 do begin  A:=А+3; A:=Х+А;  end;А ответ с учетом исправлений -в цикле X не изменяется, значит  X=0