Библиотека программирование, программирование, языки программирования, книги программирование На сайте представлена информация про программирование в Интернете и работу  

CheckBox на Grid'e (как String-,так и DBGrid'e)
Plasound & image.show
If THEN ELSE, максимальное количество вложений
UnPassword для HTML
WebCam, Как работать с WebCamer'ой?
Unsafe type\code?, Компилятор умничает?
Приявязка обработки событий в рантайме
длина текста в ComboBox, ... больше длины самого Box-a
Размер GIF'ов
Базы даных, Как записать в базу символы " и ` и '
создание TField run time, Как это делается???
Можно лт писать индексы вTreeView?, Вывод верхних и нижних индексов
Отправка HTTP-запроса, Использование Winsock
Как получить список установленых программ
Проблемы управления MDI формами, Проблемы управления MDI формами
Как Вы относитесь к курящим девушкам?
Вот, блин, буффер обмена!
Переполнение разрядной сетки, консольное приложение
Глюки BDE ? Как с этим бороться., Пропадают данные.
Подскажите по ZipTV
доступа нет!
StringList, неужели такой тормоз?
Генерация DCX
Как правильно использовать TOpenDialog
символы, задачка
Как проверить что в строке нет русских букв?
Как можно узнать что написано в окне?
Как добраться к RGB составляющим..., Вопрос по TBitmap...
FTP SERVER D7 Indy, OnListDirectory
Добавить все файлы из папки в TOpenDialog
CBT Hook
через звуковую вывести сигнал, определенной частоты и длительности
Движение по окружности
Функция для воспроизведения нот, Существует ли такая функция
Передача параметров с одной формы, на другую
символы
Копирование в Canvas
Трабл с ComboBox
Показать файл jpeg без TImage
Сдеалть функцию одной формы доступной для другой
Узнать список файлов в папке, и сохранить в TStrings
TClientSocket, соединение через прокси
Агенты (помощники), управление
Нет прорисовки нормальной, как сделать?
TTable и TQuery
Функции TAPI
Библиотека dsgnlntf.dcu, Где найти?
Дерево классов, Где его найти?
Button1 := Button2;
Как узнать номер активной строки в TQuery?
Модуль данных, Что это?
Вопрос по использованию TQuery, (SQL запросы к БД)
Имена компонентов в массиве, и использование их в цикле...
s/n Delphi 6.0 PE
Удалить папку, с файлами
Помогите придумать проект
Cell type in Excel
Есть, Нашел ешение - можно ли оптимизировать?
Текст на форме
Управление модемом в Delphi, Дозвон, ответ на звонок, отсылка/приём
Как Вы относитесь к курящим девушкам?
SB_THUMBTRACK и GetScrollInfo, Ограничение 16 бит, как его обойти.
Сделать квадратик как в Windows?..
ShellExecute, Узнать Handle
Как работать с XML?.., сохранять/читать данные в XML-документ..
Помощь в Delphi
Открыть папку, CreateProcess
Изменение цвета Item'а в ListBox'е по условию, !!!В FAQ не отсылать там не то!!!
Как проанализировать HTML файл на ссылки, и выдрать их оттуда
dateTimePicker, разница двух дат

Платные хостинги     Раскрутка сайта     Книги по программированию


символы, задачка

Только здесь 1000 посетителей на Ваш сайт всего за 3 у.е.!

- Найти количество сдвоенных символов в предложении (на паскале)

- Найти количество сдвоенных символов в предложении (на паскале)

- Что то я не понял как это сдвоенные? ..... пример можно?

- А строенные считаются одним сдвоенным или двумя?

- А можно пример, строки и что в ней надо подсчитать

- Например: классификация группы Сдесь :СС и ПП сдвоенные буквы

- а сколько сдвоенных букв в "змееед" ?

- Можно так:Код function DoubleSymbols(text: string): integer;var  i, len, count: integer;  s: string;begin  s := '';  count := 0;  len := Length(text);  for i:=1 to len do begin    if s = text[i] then inc(count);    s := text[i];  end;  Result := count;end;highlightSyntax('delphihhMWZk','delphi');а можно такКод function DoubleSymbols(text: string): integer;var  i: integer;begin  Result := 0;  for i:=1 to Length(text) do    if text[i-1] = text[i] then inc(Result);end;highlightSyntax('delphiNjBkM2M','delphi');Маленькая разница между ними

- Monty, только в последнем варианте наверное придется делать цикл не от 1, а от 2...

- Monty, для строки из N символов результат всегда будет N + 1. 2 All: так сколько сдвоенных символов в слове "длиношеее"?

- Тогда так Код function DoubleSymbols(text: string): integer;var i: integer;begin Result := 0; for i:=2 to Length(text) do   if text[i-1] = text[i] then inc(Result);end;highlightSyntax('delphikzZWVm','delphi');Все теперь так как надо?

- Это с чего это ? Если проверить строку "2222", то результат будет 3.Т.е. для строки из N одинаковых символов результат будет N-1.QUOTE 2 All: так сколько сдвоенных символов в слове "длиношеее"? Ноль! Там строенные символы есть! Или три, т.к. каждая из трёх букв "е" соприкасается хотя бы с одной другой буквой "е"... QUOTE Все теперь так как надо?Ага!

- Нет, почему три, а не два? Раз: длиношеееДва: длиношеее

- p0s0l: угу, я опять прогнал пора на покой, выращивать клубничку.

- x77 - да ладно, я тоже люблю так оговариваться/ошибаться...Monty, смотри:Вопрос: "Сколько символов?".Уточнение: Какие символы ? - Сдвоенные!Т.е. надо считать не количество ПАР символов, а количество СИМВОЛОВ...Если бы вопрос стоял так: "Найти количество пар смежных одинаковых символов", то ты сделал правильно...Считаем:Раз: длиношеееДва: длиношеееТри: длиношеееКаждый из выделенных символов является сдвоенным, т.к. является соседом другого такого же символа... Если ты не понял, это шуточное, немного запутывающее объяснение...

Интернет казино     Онлайн игры     Увеличение члена     Купить DVD


Главная страница | графическое программирование | язык программирования си | оффшорное программирование | пролог программирование | программирование dos | программирование мобильных | программирование мини атс | выпуклое программирование | программирование микросхем | программирование ms | библиотека программирование | программирование 3d | программирование j2me | программирование под windows | коды программирования | программирование статьи | asp программирование | веб программирование | lotus программирование | описания языков программирования | примеры задач программирование | программирование symbian | программирование литература | введение программирование | сравнение языков программирования | Ссылки

Все про веб программирование