Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/13: Рейтинг темы: голосов - 13, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 16.09.2010
Сообщений: 9
1

Дана последовательность из n символов.

11.10.2010, 18:18. Просмотров 2729. Ответов 1
Метки нет (Все метки)


Дана последовательность из n символов. Подсчитать:
1) сколько раз среди данных символов встречается символ + и сколько раз - символ *.
2) общее число вхождений символов +, -, *, в данную последовательность.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
11.10.2010, 18:18
Ответы с готовыми решениями:

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

Дана последовательность символов, построить и напечатать множество
Помогите решить задачку: Дана последовательность символов, построить и напечатать множество,...

Дана последовательность, состоящая из 10 слов. Напечатать те слова последовательности, которые имеют нечётное количество символов
Дана последовательность, состоящая из 10 слов. Напечатать те слова последовательности, которые...

Дана непустая последовательность символов. Требуется построить и напечатать множество, элементами которого являются встречающиеся в последовательности
Не как не могу решить задачку по Паскалю.. вот ее условвие Дана непустая последовательность...

__________________
Помогаю в написании курсовых работ и дипломов здесь.
1
Модератор
63229 / 46981 / 32383
Регистрация: 18.05.2008
Сообщений: 113,873
11.10.2010, 18:34 2
Лучший ответ Сообщение было отмечено Линочка как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
var c:char;
    kp,kz,sm:integer;
begin
writeln('Введите последовательность символов, окончание ввода 0:');
writeln('После окончания ввода нажмите Enter');
kp:=0;kz:=0;sm:=0;
repeat
read(c);
if c='+' then kp:=kp+1
else if c='*' then kz:=kz+1
else if c in ['+','-','*'] then sm:=sm+1;
until c='0';
readln;
writeln('Количество символов + =',kp);
writeln('Количество символов * =',kz);
writeln('Количество символов +-* =',sm);
readln
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
11.10.2010, 18:34

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь или здесь.

Дана последовательность из n символов. Выяснить, имеются ли в последовательности два подряд идущих символа ",-"
2. Дана последовательность из n символов. Выяснить, имеются ли в последовательности два подряд...

Дана последовательность А1...А50. Получить новую последовательность, исключив отрицательные элементы
Дана последовательность А1...А50. Получить новую последовательность, исключив отрицательные элементы

2. Дана целочисленная последовательность. Определить количество вхождений каждого числа в последовательность
Написал программу var a,c:array of integer; count,i,p,u: integer; begin for i:=1 to 10 do...

дана последовательность вещественных чисел а1,а2,.а15 Определить являеться ли последовательность упорядоченной по возрастанию
дана последовательность вещественных чисел а1,а2,...а15 Определить являеться ли последовательность...


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

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

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