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

Turbo Pascal

Войти
Регистрация
Восстановить пароль
 
Рейтинг: Рейтинг темы: голосов - 16, средняя оценка - 5.00
aragonzp
3 / 3 / 0
Регистрация: 13.01.2010
Сообщений: 51
#1

Дана строка. Подсчитать, сколько различных символов встречается в ней. Вывести их на экран. - Turbo Pascal

17.05.2010, 10:21. Просмотров 2573. Ответов 1
Метки нет (Все метки)

Дана строка. Подсчитать, сколько различных символов встречается в ней. Вывести их на экран.
Помогите плз
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
17.05.2010, 10:21
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Дана строка. Подсчитать, сколько различных символов встречается в ней. Вывести их на экран. (Turbo Pascal):

Дана строка.подсчитать , сколько различных символов встречается в ней - Turbo Pascal
Дана строка.подсчитать , сколько различных символов встречается в ней. вывести их на экран..

Дана строка. Подсчитать, сколько различных символов встречаются в ней - Turbo Pascal
Дана строка. Подсчитать, сколько различных символов встречаются в ней. Вывести их на экран.

Дана строка. В ней встречается один пробел. Подсчитать, сколько символов до него и после него - Turbo Pascal
Здравствуйте) Помогите,пожалуйста с решением задач: 1.Дана строка. В ней встречается один пробел. Подсчитать, сколько символов до него...

Дана строка символов. Сколько раз встречается в ней сочетание ‘-+=’. - Turbo Pascal
Строковый тип данных. Задачи. 1) Дана строка символов. Сколько раз встречается в ней сочетание ‘-+=’. Буду очень признателен,

Дана строка. Подсчитать, сколько в ней символов *, ;, : - Turbo Pascal
2)Дана строка. Подсчитать, сколько в ней символов *, ;, :.

Дана строка, заканчивающая точкой. Подсчитать сколько в ней символов * - Turbo Pascal
Дана строка, заканчивающая точкой. Подсчитать сколько в ней символов * .

1
Demon-red
139 / 139 / 19
Регистрация: 25.01.2010
Сообщений: 181
17.05.2010, 11:07 #2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
uses crt;
var s:string;
i,k:integer;
begin
clrscr;
write('s = ');
readln(s);
k:=0 ;
for i:=1 to length(s) do
if pos(':'+s[i]+':',s) = 0 then
begin
s:=s+':'+s[i]+':';
inc(k)
end;
writeln('различных символов = ',k);
readln;
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
17.05.2010, 11:07
Привет! Вот еще темы с ответами:

Подсчитать, сколько различных символов встречается в строке - Turbo Pascal
Дана строка. Подсчитать, сколько различных символов встречается в ней. Вывести их на экран

Подсчитать, сколько различных символов встречается в строке - Turbo Pascal
Дана строка. Подсчитать, сколько различных символов встречается в ней. Вывести их на экран.

Подсчитать, сколько различных символов встречается в строке. - Turbo Pascal
Дана строка. Подсчитать, сколько различных символов встречается в ней. Вывести их на экран.

Дана строка. Подсчитать, сколько различных символов встречается в ней - Pascal
Дана строка. Подсчитать, сколько различных символов встречается в ней. Вывести их на экран.:(


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

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

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