Форум: "Потрепаться";
Текущий архив: 2002.02.25;
Скачать: [xml.tar.bz2];
ВнизПомогите с массивами Найти похожие ветки
← →
Adder (2002-01-02 14:34) [10]хм... используй "кучу" :)
Вот тебе пример:
program example;
type
PMyArray=^MyArray;
TMyArray=array[0..240] of string;
var
a,b,c:PMyArray;
begin
a:=New(PMyArray);
b:=New(PMyArray);
c:=New(PMyArray);
a^[0]:="Pascal";
writeln(a^[0]);
Dispose(a);
Dispose(b);
Dispose(c);
end.
Страницы: 1 вся ветка
Форум: "Потрепаться";
Текущий архив: 2002.02.25;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.004 c