Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
2k7fakel
0 / 0 / 0
Регистрация: 26.10.2012
Сообщений: 22
1

Дан текстовый файл f. Исключить пробелы, стоящие в концах его строк

01.03.2013, 01:55. Просмотров 890. Ответов 1
Метки нет (Все метки)

Дан текстовый файл f. Исключить пробелы, стоящие в концах его строк. Результат поместить в файл f1.

Добавлено через 5 часов 48 минут
помогите плиз)
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
01.03.2013, 01:55
Ответы с готовыми решениями:

Дан текстовый файл f1. Исключить пробелы, стоящие в концах его строк
Ребята помогите с заданием! Дан текстовый файл f1. Исключить пробелы, стоящие в концах его...

Дан текстовый файл f1. Исключить пробелы, стоящие в концах его строк. Результат поместить в файл f2
Ребята помогите с заданием! Дан текстовый файл f1. Исключить пробелы, стоящие в концах его...

Исключите пробелы, стоящие в концах строк файла
Дан текстовый файл f. Исключите пробелы, стоящие в концах его строк. Результат поместите в файл f1.

Составить программу, исключающую пробелы, стоящие в концах строк текстового файла p и помещающую результат в файл g.
Создайте текстовый файл р. Составьте программу, исключающую пробелы, стоящие в концах его строк и...

Организовать текстовый файл состоящий из N строк. преобразовать фалй, удалив в каждой его строке лишние пробелы
Будте любезны, помогите с задачей... Организовать текстовый файл состоящий из N строк....

1
CodeR
Фрилансер
3381 / 2782 / 3000
Регистрация: 08.02.2012
Сообщений: 6,722
Записей в блоге: 1
03.03.2013, 13:18 2
Лучший ответ Сообщение было отмечено 2k7fakel как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Var f,f1:text;
    s:string;
Begin
    Assign(f,'in.txt');Reset(f);
    Assign(f1,'out.txt');Rewrite(f1);
    While not Eof(f) do
    Begin
      readln(f,s);
      While s[Length(s)]=' ' do
       Delete(s,Length(s),1);
      write(f1,s);
    end;
    Close(f);Close(f1);
    writeln('Результат в файле "out.txt"');
End.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
03.03.2013, 13:18

Дан текстовый файл. Удалить из него все лишние пробелы
Текстовые файлы: Дан текстовый файл. Удалить из него все лишние пробелы, оставив между словами не...

Дан текстовый файл F и строка S. посчитать кол-во строк совпадающих со строкой S и рез-т записать в файл G
Дан текстовый файл F и строка S. посчитать кол-во строк совпадающих со строкой S и рез-т записать в...

Дан многострочный текстовый файл слова разделены пробелами, сформировать новый файл с палиндромом строк первого файла
Подскажите что не так в создании и обработке второго файла... var...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru