Строки - Общие вопросы Delphi

Fantta · 02.06.2014, 11:23

Помогите пожалуйста.Дана строка, состоящая из букв и цифр. Определить количество букв в строке.

ZX Spectrum-128 · 02.06.2014, 11:41

Код:

  count:=0;
  for i:=1 to length(S) do
    if s[i] in ['А'..'Я','а'..'я'] then
      inc(count);

02.06.2014, 11:23	#1
Fantta Регистрация: 25.04.2014 Сообщений: 9	Строки Помогите пожалуйста.Дана строка, состоящая из букв и цифр. Определить количество букв в строке.

02.06.2014, 11:41	#2
ZX Spectrum-128 Участник клуба Регистрация: 05.11.2013 Сообщений: 1,601	Код: `count:=0; for i:=1 to length(S) do if s[i] in ['А'..'Я','а'..'я'] then inc(count);`

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Задача на строки. Даны две строки. Определить можно ли из символов первой строки получить вторую строку.( написать подпрограммой и	ANTON1994	Паскаль, Turbo Pascal, PascalABC.NET	5	09.02.2013 14:07
Программа на языке "Ассемблер" - ввод строки, анализ длины строки, добавление точки в конец строки	Алексей_2012	Помощь студентам	1	05.04.2012 11:26
Сделать в гриде строки выше, чтобы не растягивать строки до бесконечности	kris__tina	БД в Delphi	1	09.06.2011 15:31
Создание пустой строки и копирование в неё содержимое предыдущей строки	Gvaridos	Microsoft Office Excel	2	29.10.2010 13:33
Перенести символа с начала строки в место перед запятой этой же строки.	Zhiltsov	Microsoft Office Excel	4	05.06.2009 13:10