Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
Котелевский
0 / 0 / 0
Регистрация: 09.01.2012
Сообщений: 7
1

Строки

09.01.2012, 20:41. Просмотров 862. Ответов 1
Метки нет (Все метки)

Дана строка символов S. Получить первое натуральное і, для которого каждый из символов Si и Si+1 совпадает с буквой 'a'. Если такой пары символов нет, то ответом должно быть число 0.

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

Определить длину строки. Если длина строки >6, удалить часть строки в { } скобках.
Ввести с клавиатуры строку символов. Признак окончания ввода строки – нажатие...

Строки. Определить длину введенной строки, если длина кратна 4, то первая часть строки меняется местами со второй
Ввести с клавиатуры строку символов.признак окончания ввода строки-нажатие...

Строки. Даны строка S и подстрока S1.Удалить из строки S все вхождения строки S1
Даны строка S и подстрока S1.Удалить из строки S все вхождения строки S1.В...

Строки. Даны строки S и So. Найти количество вхождений строки So в строку S
Помогите пожалуйста, как сделать эту задачу без этих вот строчек... B:=TRUE; и...

Слить две строки, вставив символы одной строки между символами другой строки
Строка a из n символов лексикографически меньше строки b из n символов, если...

1
Puporev
Модератор
54679 / 42100 / 29069
Регистрация: 18.05.2008
Сообщений: 99,353
09.01.2012, 20:54 2
Лучший ответ Сообщение было отмечено Котелевский как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
var s:string;
     i,j:byte;
begin
writeln('Введите строку:');
readln(s);
i:=0;
j:=1;
while(j<length(s))and(i=0) do
if copy(s,j,2)='aa' then i:=j
else j:=j+1;
write('i=',i);
readln
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
09.01.2012, 20:54

Строки. Если в конце строки точка отсутствует, то найти слово, заканчивающееся точкой и перенести его в конец строки.
Дана строка, состоящая из слов и содержащая одну точку в конце одного из слов....

Поменять все элементы 5 строки матрицы на удвоенное значение элементов 1 строки
Поменять местами все элементы 5 строки на удвоенное значение элементов 1...

Нахождение длины той части строки s, которая не содержит символы из строки s1
Разработать процедуру или функцию StrCSpn(s,s1) , выполняющую нахождение длины...


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

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

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