Массив...

[Женечка92]

[Error] Unit1.pas(40): Undeclared identifier: 'A' что это значит??? вроде только что все норм было, а теперь ему не нравится

вот что получилось:
Код:

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
Memo1: TMemo;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
Const
N=10;
var
Form1: TForm1;
A,B:array[1..N]of integer; //À - èñõîäíûé ìàññèâ,  - ïîëó÷åííûé ìàññèâ
i,j:integer;
str:string;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
Button2.Enabled:=true;
Randomize;
str:='';
for i:=1 to N do
begin
A[i]:=Random(1201)-600;
str:=str+IntToStr(A[i])+#9;
end;
Memo1.Lines.Add(str);
str:='';
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
button2.Enabled:=false;
str:='';
j:=0;
for i:=1 to N do
begin
if A[i] mod 10=0 then //òî ýëåìåíò íà 0 çàêàí÷èâàåòñÿ
begin //âñòàâëÿåì åãî â ìàññèâ Â, åñëè íåò, ïðîïóñêàåì åãî j:=j+1;
B[j]:=A[i];
str:=str+IntToStr(B[j])+#9;
end;
end;
Memo1.Lines.Add(str);
end;

end.
он массив не заполняет числами по нажатию кнопки... подскажите в чем проблема

[Sharom_Debt]

Может где то поставил русскую А вместо английской.