Люди пожалуйста помогите сделать программы по файлам у меня что-то плохо получается!!! Очень сильно нужно PLZZZ!!!
1. Создать файл вещественных чисел. Переписать в другой файл его компоненты, сначала положительные, затем отрицательные. 2. Дан текстовый файл F. Записать в файл F1, компоненты файла F, заменив все прописные буквы на строчные. 3. Дан файл F, компоненты которого являются целыми числами. Найти сумму всех четных чисел среди компонент.
writeln ('Введите числа: '); for i:=1 to N do begin readln(B); write (f, B); end;
reset(f); while not eof(f) do begin read(f,B); if B>=0 then write(f1,B); end;
reset(f);
while not eof(f) do begin read(f,B); if B<0 then write(f1,B); end; writeln ('Все компоненты переписаны в ',s1, ' файл'); writeln ('Для выхода - любая клавиша'); readln; close(f); close(f1); end.
GoodWind
GoodWind
18.12.2005 2:04
чё " " ? я ж тебе решение разжевал
klem4
18.12.2005 15:03
во второй задаче впринципе можно сократить :
while not eof (f) do begin read (F, B);
if b in q then begin x:=(ord(b)+32); b:=chr(x); x := x+1; end;
write(f1,b); end;
на
while not eof (f) do begin read (F, B); if b in q then write(f1, chr(ord(b)+32)); end;
и вообще что такое x := x + 1 я не понял
ManyaK
18.12.2005 21:31
Cпасибо за редактирование второй программы! Думаю она дествительно так станет намного проще!
Может мне еще поможете с такой задачкой разобраться. Буду очень благодарен!!! Задача: Даны файлы f1, f2, f3, f4, f5 компоненты которых являются действительными числами. Организовать обмен компонентами между файлами в соответствии со следующей схемой. f1=> f3; f2=>f2; f3=>f5; f4=>f2; f5=>f1 (т. е . компоненты файла f1 переписываются в файл в файл f3)/ Разрешается использовать только одby вспомогательный файл h.
ManyaK
19.12.2005 6:22
Как можно вывести на экран данные которые содержит текстовый файл???
... reset(f); {открываешь файл} while not eof(f) do begin {пока не конец файла ..} read(f,b); {считываешь каждый элемент} writeln (b); {выводишь на экран} end; {ВСЁ!} ...
klem4
19.12.2005 20:29
файл текстовый - содержимое строки, чатать надо строками - будет быстрее чем посимвольно.
ManyaK
20.12.2005 19:52
Что получится если из файла F,содержащего данные переписать данные в другой файл G, содержащий данные. И потом из G в F??? Получится два файла содержащие одинаковые данные??? Или что-то другое???
volvo
20.12.2005 19:55
Смотря какие это файлы, как ты их открываешь, и как записываешь... Может получиться дубликат одного и того же файла, информация из одного файла может быть добавлена в другой... Вариантов много.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.