Форум: "Потрепаться";
Текущий архив: 2003.04.21;
Скачать: [xml.tar.bz2];
Вниз
Вопрос по Делфи! Очень нужно! Найти похожие ветки
← →
Ольга (2003-04-02 19:38) [0]Удалено модератором
Примечание: В поле тема, должна быть именно тема вопроса
← →
Palladin (2003-04-02 20:00) [1]Незачто.
← →
Mike Kouzmine (2003-04-02 20:12) [2]readln;
берем среднее число
writeln;
← →
Kobik (2003-04-02 20:25) [3]2Palladin
:-)
2Ольга
Ну это очень просто. Есть несколько способов. Вот один:
var f1,f2:file of integer;
a,b,c:integer;
begin
assignfile(f1,"file1");
reset(f1); {из этого файла читаем}
assignfile(f2,"file2");
rewrite(f2); {в этот пишем}
while not eof(f1) do {пока не достигнут конец первого файла}
begin
read(f1,a,b,c); {читаем все 3 элемента}
write(f2,b); {записываем только 2-й}
end;
end;
← →
Palladin (2003-04-02 23:18) [4]проблема в том что девушка не потрудилась указать чем же эти столбики разделяются...
← →
Kobik (2003-04-03 16:03) [5]Я вот тут вчера забыл перед последним end; надо вписать
closefile(f1);
closefile(f2);
2Palladin
пробелами наверное. чем же еще
← →
Mike Kouzmine (2003-04-03 17:54) [6]Блин так просто.... А не будет он пробелы читать, переводы строк и прочее?
← →
vopros (2003-04-03 18:07) [7]Вы что в слепую отвечаете?Где вопрос?
← →
Mike Kouzmine (2003-04-03 18:10) [8]А мы его запомнили до удаления.
← →
Kobik (2003-04-03 19:19) [9]Вот и я о том же.
Мало того, что " »» Перемещено из конференции "Общие вопросы"", дак еще и текст удалили. Кстати тут такое нередко случается.
2Ольга
Напиши прокатил ли этот способ. А то может че другое придумаем...
???? А Ольга узнала, что ее вопрос перенесли?
← →
Mike Kouzmine (2003-04-03 19:21) [10]Она обиделась на замедлителей ядерной реакции.
← →
Kobik (2003-04-03 19:49) [11]2Mike Kouzmine
Я не танкист, но все же поясни про
>>замедлителей ядерной реакции.
← →
Mike Kouzmine (2003-04-03 19:51) [12]Одно из значений слова Moderator
← →
Kobik (2003-04-03 19:59) [13]Спасибо за пояснение.
Блин! Была вроде обычная тема, а превратили непонятно в что. Наверное лучше в ЧАТ пойти.
← →
Mike Kouzmine (2003-04-03 20:03) [14]Мы тебя и чате достанем...
← →
Kobik (2003-04-03 20:19) [15]2Mike Kouzmine
Вот и достал
2...
конечно не f1,f2:file of integer;
а f1,f2:textfile;
← →
Ольга (2003-04-04 19:34) [16]Ага, спасибки за помощьчь! Вы очень помогли!
Great thanks!
Страницы: 1 вся ветка
Форум: "Потрепаться";
Текущий архив: 2003.04.21;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.009 c