Форум программистов, компьютерный форум, киберфорум
Наши страницы

Free Pascal

Войти
Регистрация
Восстановить пароль
 
volo_D9
0 / 0 / 0
Регистрация: 14.10.2015
Сообщений: 38
#1

Выделить в переменную t все символы последней строки текста - Free Pascal

07.12.2015, 22:30. Просмотров 249. Ответов 1
Метки нет (Все метки)

Дан текстовый файл литерных величин. Выделить в переменную t все символы последней строки текста, идущие в ней после первого вхождения символа, значение которого хранится в переменной Х.

текст вывести из файла
помогите
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
07.12.2015, 22:30
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Выделить в переменную t все символы последней строки текста (Free Pascal):

Нужно выделить из веденной строки все английские слова - Pascal
Нужно выделить из веденной строки все английские слова!!!!!!

Заменить все элементы последнего столбца суммой элементов последней строки матрицы - Pascal
1) дана матрица целых чисел размером 4х4.Заменить все элементы последнего столбца суммой элементов последней строки матрицы. 2)элементы...

Удалить из строки все сдвоенные, строенные и т. д. символы - Pascal
Удалить из строки все сдвоенные, строенные и т. д. символы

Удалить из строки все символы, находящиеся между «А» и «В» - Pascal
1.Дана строка символов. Удалить из нее все символы, находящиеся между «А» и «В». Если таких последовательностей больше одной, то удалить...

Удалить из строки все символы, заключенные в скобках! - Pascal
Добрый день, подскажите, пожалуйста, как можно удалить символы в строке, котрые находятся в скобках, но еще условие, что скобок может быть...

удалить из строки все символы не являющиеся буквами - Pascal
помогите пожалуйста!!!!!!!!!!! Введите строку сивмолов.удалить из строки все символы не являющиеся буквами.вывести на экран изменённую...

1
bormant
Модератор
Эксперт Pascal/DelphiЭксперт NIX
3749 / 2446 / 1306
Регистрация: 22.11.2013
Сообщений: 6,788
07.12.2015, 23:49 #2
Лучший ответ Сообщение было отмечено автором темы, экспертом или модератором как ответ
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
var
  f: Text;
  t: String;
  x: Char;
begin
  Write('Введите символ: '); ReadLn(x);
  Assign(f,'text.txt'); Reset(f);
  while not EOF(f) do ReadLn(f,t);
  Close(f);
  if Pos(x,t)>0 then Delete(t,1,Pos(x,t)) else t:='';
  WriteLn('''',t,'''');
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
07.12.2015, 23:49
Привет! Вот еще темы с ответами:

Строки. Удалить все символы в строке после «*» - Pascal
помогите пожалуйста 1.Составьте программу, которая как только в строке встретиться символ «*», удаляет все символы в строке после «*»....

Преобразовать строку, удалив все символы 'a' и продублировав все символы отличные от 'a' - Pascal
Дана строка A. Нужно преобразовать её, удалив все символы 'a' и продублировав все символы отличные от 'a'. К.П.: Ввод qawaeara | Вывод:...

Переписать текст в файл, удалив из него все слова, начинающиеся с той же буквы ,что и последнее слово последней строки - Pascal
Здравствуйте,помогите пожалуйста решить.Работа с файлами. Файл input.dat содержит несколько строк текста.Слова в тексте могут...

Удалить из строки все подряд идущие одинаковые символы - Pascal
Удалить из строки все подряд идущие одинаковые символы(КУмир/Паскаль)


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

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

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