|
|
От: | Аноним | |
| Дата: | 10.02.03 09:29 | ||
| Оценка: | |||
procedure GG(Arrra : array of integer);
begin
//что получим, если написать
ShowMessage(IntToStr(Arrra[1]));
end;
procedure BB();
var blabla : array [1..20] of integer;
begin
blabla[1]:=12;
GG(blabla);
end;