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

Подсчитать во введённом текстовом отрывке отдельно количество цифр

10.06.2014, 20:30. Просмотров 878. Ответов 1
Метки нет (Все метки)

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

Запросить текст и во введённом тексте посчитать количество цифр и вывести их отдельно на экран
Запросить текст и во введённом тексте посчитать количество цифр и вывести их...

Введённом тексте с клавиатуры подсчитать количество букв, цифр и пробелов
Введённом тексте с клавиатуры подсчитать количество букв, цифр и пробелов.

Подсчитать в текстовом файле количество слов и количество цифр
Дан файл, содержащий текст. Сколько слов в тексте? Сколько цифр в тексте?

Множества. Во введенной строке символов подсчитать количество букв (отдельно русского и английского алфавитов) и цифр
4. Во введенной строке символов подсчитать количество букв (отдельно русского и...

Подсчитать количество строк не содержащих цифр в текстовом файле.
Создать текстовый файл с именем "dan". Подсчитать количество строк в нем, не...

1
Svager
396 / 375 / 406
Регистрация: 14.09.2013
Сообщений: 1,204
10.06.2014, 22:10 2
Лучший ответ Сообщение было отмечено ocsoget как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
uses crt;
const a:set of char=['0'..'9'];
      b:set of char=['a'..'z','A'..'Z'];
      c:set of char=[',','.',' ',';',':','-'];
var s:string;
    i,k,k1,k2:integer;
begin
 write('Ââåäèòå ñòðîêó :');
  readln(s);
 for i:=length(s) downto 1 do
  begin
   if s[i] in a then
    inc(k);
   if s[i] in b then
    inc(k1);
   if s[i] in c then
    inc(k2);
  end;
 writeln('Êîë-Г±ГІГўГ® öèôð = ',k);
  writeln('Êîë-Г±ГІГўГ® Г«Г*ГІГЁГ*Г±ГЄГЁГµ ГЎГіГЄГў = ',k1);
   writeln('Êîë-Г±ГІГўГ® Г§Г*Г*êîâ ГЇГіГ*ГЄГІГіГ*öèè = ',k2);
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.06.2014, 22:10

В текстовом файле в строке с заданным номером k>0 подсчитать количество цифр
В текстовом редакторе создать файл из нескольких строк символов. Вывести его...

Дана строка. Подсчитать количество подсчитать количество содержащихся в ней цифр
1)Дана строка. Подсчитать количество подсчитать количество содержащихся в ней...

В тексте подсчитать количество гласных «A», «O», «E», «I», «U», «Y» отдельно для каждой буквы
В тексте из 20 символов латинских букв подсчитать количество глас-ных «A», «O»,...


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

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

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