Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/3: Рейтинг темы: голосов - 3, средняя оценка - 4.67
povtiasd051
2 / 2 / 0
Регистрация: 06.12.2010
Сообщений: 135
1

Вывести все символы, которые встречаются в первой строке тексте и не встречаются в последней.

13.04.2011, 23:10. Просмотров 609. Ответов 3
Метки нет (Все метки)

Вывести все символы, которые встречаются в первой строке тексте и не встречаются в последней.

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
13.04.2011, 23:10
Ответы с готовыми решениями:

Удалите из второй строки все символы, которые встречаются в первой строке, и поместите их в третью строку
заранее большое спасибо!

В файле а1 набран текст. Вывести все символы, которые встречаются в первой половине текста.
В файле а1 набран текст. Вывести все символы, которые встречаются в первой половине текста.

Удалить из первой строки символы, которые встречаются во второй строке
Помогите, пожалуйста, составить программу: Удалить из первой строки символы, которые встречаются...

Вывести в алфавитном порядке все буквы, которые встречаются в тексте
Задан текст из латинских букв. Вывести в алфавитном порядке все буквы, которые встречаются в тексте...

Вывести все буквы которые встречаются в строке и их количество.
Дана строка S нужно вывести все буквы которые встречаются в ней и их количество. Первая...

3
SuPeR XaKer
2846 / 1975 / 788
Регистрация: 23.09.2010
Сообщений: 4,877
13.04.2011, 23:52 2
где хранится текст?
0
povtiasd051
2 / 2 / 0
Регистрация: 06.12.2010
Сообщений: 135
14.04.2011, 16:14  [ТС] 3
в файле f1
0
SuPeR XaKer
2846 / 1975 / 788
Регистрация: 23.09.2010
Сообщений: 4,877
14.04.2011, 16:31 4
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
Uses
 CRT;
Var
 s,s2:string;
 l,m:set of char;
 i:byte;
 f:text;
begin
 Assign(f,'D:\1.txt');
 reset(f);
 readln(f,s);
 l:=[];
 m:=[];
 writeln(s);
  for i:=1 to length(s) do
   l:=l+[s[i]];
  while not eof(f) do
   readln(f,s2);
 for i:=1 to length(s2) do
  m:=m+[s2[i]];
 writeln(s2);
 writeln;
 for i:=0 to 255 do
  if chr(i) in (l-m) then write(chr(i):3);
 Close(f);
end.
0
14.04.2011, 16:31
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
14.04.2011, 16:31

На экран вывести цифры , которые встречаются в тексте
Дан текст состоящий из букв и цифр, признаком конца текста является точка. На экран вывести цифры ,...

Вывести символы, которые встречаются более 2х раз.
Вывести символы, которые встречаются более 2х раз.

Вести все буквы (русско и латинский) , которые не встречаются в тексте.
Вести все буквы (русско и латинский) , которые не встречаются в тексте.


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

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

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