Форум: "Потрепаться";
Текущий архив: 2002.02.25;
Скачать: [xml.tar.bz2];
ВнизЗагрузка файла! Найти похожие ветки
← →
Alex_Sudakov (2001-12-28 17:57) [5]Очень смешно - так он вообще только ПОСЛЕДНЮЮ строчку загрузит...
var a:string;
...
while not Eof(f) do
begin
Read(f, a);
S:=S+A;
end;
Страницы: 1 вся ветка
Форум: "Потрепаться";
Текущий архив: 2002.02.25;
Скачать: [xml.tar.bz2];
Память: 0.43 MB
Время: 0.004 c