Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Центр помощи > [Delphi] подсчитать количество символов в строке

Автор: DeeCee 10.12.2007, 01:05

Помогите пожалуйста подсчитать количество символов в строке - *,;:

Автор: kBepTu 10.12.2007, 01:15

Код


int GetStrSize(char * const s)
{
    int i=0;
    while(s[i++]!='\0');
    return i;
}

Автор: Silent_s 10.12.2007, 01:24

С помощью for'a smile

Код


main()
{
    int nc;
    for (nc = 0; getchar() != '\n'; ++nc)
        ;
    printf("%d\n", nc);
}

Добавлено через 2 минуты и 2 секунды
А тебе начем надо то? smile

Автор: zkv 10.12.2007, 01:57

M
zkv

DeeCee, необходимо указывать язык программирования.

Автор: DeeCee 10.12.2007, 08:39

извините, совсем забыл

на Delphi

Автор: THandle 10.12.2007, 09:36

Цитата(DeeCee @ 10.12.2007, 01:05

)

*,;:

Это чо? Символы которые надо найти?
Тогда держи функцию:

Код


function CountCharInString(S : String; C : Char) : integer;
var
  i : integer;
begin
  result := 0;
  for i := 1 to length(s) do
    if s[i] = c then
      inc(result);
end;

Добавлено через 1 минуту и 2 секунды
Где S - строка в которой надо искать символ, а C - сам символ.