Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.83/6: Рейтинг темы: голосов - 6, средняя оценка - 4.83
0 / 0 / 1
Регистрация: 07.11.2014
Сообщений: 76
1

Найти разницу между количеством групп букв и количеством групп знаков

09.11.2014, 17:14. Показов 1169. Ответов 2
Метки нет (Все метки)

Заданный текст каждый символ которого может быть маленькой латинской буквой, цифрой или одним из знаков "+", "-", "*". Группа букв это последовательность расположенных подряд букв, которой не предшествует буква и по какой конкретно не стоит буква. Аналогично определяются группа цифр и группа знаков. Найти разницу между количеством групп букв и количеством групп знаков.
Написать программу обработки строки.
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
09.11.2014, 17:14
Ответы с готовыми решениями:

Найти разницу между количеством групп букв и количеством групп цифр
Заданный текст каждый символ которого может быть маленькой латинской буквой, цифрой или одним из...

Выяснить, верно ли, что в заданной строке больше групп цифр, чем групп знаков
Всем доброй ночи!Огромная просьба,помогите в решении задачи с использованием переменных типа string...

Строки. Выяснить, верно ли, что в данной строке больше групп букв, чем групп цифр
рассматривается непустая строка содержащая не более 80 символов. каждый символ строки может быть...

Количество групп букв и знаков в строке
есть текст каждый символ который может быть малинькой латинской буквой ,цыфрой или одним из знаков...

2
Почетный модератор
64089 / 47498 / 32734
Регистрация: 18.05.2008
Сообщений: 115,182
09.11.2014, 18:05 2
Лучший ответ Сообщение было отмечено kiril98402 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
uses crt;
const cf=['0'..'9'];{цифры}
      zn=['+','-','*'];{знаки}
      bk=['a'..'z']; {буквы}
var ds:set of char;
    c:char;
    s:string;
    n,i,kb,kz:byte;
begin
clrscr;
writeln('Введите строку из малых английских букв, цифр  и знаков +  - * ');
writeln('окончание ввода Enter');
s:='';
ds:=cf+zn+bk;{допустимые символы}
repeat
c:=readkey;{читаем код клавиши}
if c in ds then{если допустимый}
 begin
  s:=s+c;{добавляем к строке}
  write(c);{выводим на экран}
 end;
if c=#13 then writeln;{если Enter, на новую строку}
until c=#13;{конец ввода}
s:='0'+s;//добавим в начало символ не буку и не знак
n:=length(s);
{будем считать группы знаков и букв}
kb:=0;
kz:=0;
for i:=2 to n do
if(s[i] in bk)and not((s[i-1] in bk)) then inc(kb){если буква и перед ней не буква}
else if(s[i] in zn)and not((s[i-1] in zn)) then inc(kz);{если знак и перед ней не знак}
writeln('Количество групп букв=',kb,' групп знаков=',kz);
writeln('Их разница=',abs(kb-kz));
readln
end.
1
0 / 0 / 1
Регистрация: 07.11.2014
Сообщений: 76
09.11.2014, 18:57  [ТС] 3
спасибо
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
09.11.2014, 18:57

Вывести номера групп, где отличников более 15% и число таких групп
Дана матрица из 2 столбцов и 10 строк. Первый элемент каждой строки представляет общее число...

Отпечатать номера групп, где отличников более 15% и число таких групп
Дана матрица из 2 столбцов и 10 строк. Первый элемент каждой стоки представляет общее число...

Найти количество таких групп букв, которые начинаются и кончаются одной и той же буквой
Не знаю как решить задачу именно с помощью массивов. Дан текст (массив символьных строк), каждый...

Найти и вывести на экран слово с наименьшим количеством букв
Разработать программу, которая в заданной строке находит и выводит на экран слово с наименьшим...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru