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

Вывести все буквы которые встречаются в строке и их количество.

21.12.2012, 08:46. Просмотров 480. Ответов 5
Метки нет (Все метки)

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


Первая строка входного файла содержит состоящию только из строчных букв английского алфавита строку S(1<= длина S<=1000) для каждой буквы нужно вывести сколько раз она встречается разделяя пробелом, в алфавитном порядке
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
21.12.2012, 08:46
Ответы с готовыми решениями:

Дана строка S. нужно вывести все буквы, которые встречаются в ней, и их количество
помогите составить программу этой задачи. паскаль

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

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

Подсчитать количество слов в строке, и вывести на экран только те из них, которые начинаются с буквы 'а'
Здравствуйте, нужна ваша помощь в решении задачи по Turbo Pascal Задача:Дана строка, состоящая из...

Вывести все буквы, которые входят в наибольшее количество слов строки
Помогите мне пожалуйста с решением задачи, а так мне нужно решить три задачи, я в этом вообще...

5
magirus
21.12.2012, 09:18
  #2

Не по теме:

это олимпиада за какой класс ?

0
Puporev
Модератор
56854 / 43438 / 30034
Регистрация: 18.05.2008
Сообщений: 103,472
21.12.2012, 09:32 3
Цитата Сообщение от ent2013 Посмотреть сообщение
строку S(1<= длина S<=1000)
ent2013, Вам точно в Турбо Паскале нужно? Но в нем нет строк длиннее 255 символов.
1
CodeR
Фрилансер
3387 / 2788 / 3000
Регистрация: 08.02.2012
Сообщений: 7,109
Записей в блоге: 1
21.12.2012, 09:37 4
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Var A:array['a'..'z'] of byte;
    i:byte;
    s:string;
    f:text;
    ch:char;
Begin
    Assign(f,'in.txt');Reset(f);
    readln(f,s);
    Close(f);
    For i:=1 to Length(s) do
     inc(A[s[i]]);
    For ch:='a' to 'z' do
     write(ch,'-',A[ch],' ');
    readln;
End.
0
ent2013
0 / 0 / 0
Регистрация: 20.12.2012
Сообщений: 6
21.12.2012, 12:39  [ТС] 5
Цитата Сообщение от magirus Посмотреть сообщение

Не по теме:

это олимпиада за какой класс ?

11 класс.
0
ent2013
0 / 0 / 0
Регистрация: 20.12.2012
Сообщений: 6
21.12.2012, 12:40  [ТС] 6
Цитата Сообщение от Puporev Посмотреть сообщение
ent2013, Вам точно в Турбо Паскале нужно? Но в нем нет строк длиннее 255 символов.
точно турбо паскаль...
0
21.12.2012, 12:40
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
21.12.2012, 12:40

Вывести все буквы, которые входят в наибольшее количество слов строки
В первой надо - вывести все буквы, которые входят в наибольшее количество слов строки - &quot;Я учусь...

Вывести буквы строки, которые встречаются 1 раз
Подскажите идею по строкам. Дан текст надо найти те буквы которые в данном тексте встречаются 1...

Удалить из слова X все буквы, которые встречаются в слове Z.
Напишите программу, удаляющую из слова X все буквы, которые встречаются в слове Z. Help me!!!!


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

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

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