Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Tamin
0 / 0 / 0
Регистрация: 02.10.2016
Сообщений: 7
#1

В заданной последовательности символов определить количество символов «*», стоящих после двоеточия - Pascal

18.10.2016, 01:15. Просмотров 408. Ответов 3

Дана последовательность символов, заканчивающаяся точкой. Известно, что среди этих символов есть двоеточие. Определить количество символов «*», стоящих после двоеточия.

Нужно решить через (символьный тип) Char.
Совсем не понимаю, кто-нибудь спасайте!
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
18.10.2016, 01:15
Я подобрал для вас темы с готовыми решениями и ответами на вопрос В заданной последовательности символов определить количество символов «*», стоящих после двоеточия (Pascal):

Дана строка символов. Определить количество символов, расположенных после первого ":"
Определить количество символов, расположенных после первого “:”.

Определить количество одинаковых символов в последовательности
2)Дана последовательность символов, в начале которой имеется некоторое...

Определить количество слов, начинающихся с последовательности символов «au»
Дана последовательность символов латинского алфавита, заканчивающаяся...

В заданной последовательности символов подсчитать число пробелов и определить, входит ли в неё заданная буква
Дана последовательность символов х1, х2, ..., xn. Определить: -количество...

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

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

3
Kodzaev
3002 / 1891 / 1646
Регистрация: 30.04.2011
Сообщений: 3,054
18.10.2016, 03:02 #2
Лучший ответ Сообщение было отмечено Sergio Leone как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
var
  c: char;
  k: integer;
  f: boolean;
  
begin
  f := false;
  k := 0;
  repeat
    ReadLn(c);
    if c = ':' then f := true;
    if f and (c = '*') then k := k + 1;
  until c = '.';
  WriteLn('Количество символов ''*'' после двоеточия = ', k);
  ReadLn
end.
1
Sergio Leone
2462 / 1107 / 579
Регистрация: 07.06.2014
Сообщений: 3,259
18.10.2016, 08:19 #3
Цитата Сообщение от Kodzaev Посмотреть сообщение
ReadLn(c);
думаю, что лучше написать
Pascal
1
Read(c);
тогда символы можно записать в строку, не нажимая после каждого символа Enter (ReadLn требует Enter в конце ввода).
Хотя, конечно, это поведение может зависеть от конкретного Паскаля.
1
Tamin
0 / 0 / 0
Регистрация: 02.10.2016
Сообщений: 7
20.10.2016, 12:44  [ТС] #4
Спасибо огромное!!!
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
20.10.2016, 12:44
Привет! Вот еще темы с решениями:

Подсчитать в заданной строке количество всех символов B
Помогите пожалуйста. Подсчитать в заданной строке количество всех символов B и...

Выводить на экран последовательность символов, расположенных до первого двоеточия
.....

Подсчитать количество символов а-русских букв в заданной строке
Помогите пожалуйста решить. Составить программу, подсчитывающую количество...

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


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

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

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