Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.89/9: Рейтинг темы: голосов - 9, средняя оценка - 4.89
Чадин Александр
0 / 0 / 0
Регистрация: 16.05.2013
Сообщений: 12
1

Построить множество встречающихся в последовательности знаков арифметических операций и знаков препинания

21.06.2013, 23:52. Просмотров 1793. Ответов 1
Метки нет (Все метки)

Дана непустая последовательность символов. Требуется
построить и напечатать множество, элементами которого являются
встречающиеся в последовательности знаки арифметических операций и знаки препинания
0
Лучшие ответы (1)
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
21.06.2013, 23:52
Ответы с готовыми решениями:

Получить множество из встречающихся только в одной из трёх строк цифр и знаков арифметических операций
Множества в паскаль. Даны три строки символов. Получить и распечатать множество из встречающихся...

Построить множество из встречающихся в последовательности букв от G до N и цифр от 0 до 9
Дана непустая последовательность символов.Требуется построить и напечатать множество,элементами...

Построить множество из входящих в строку букв от 'A' до 'Z' и знаков препинания
Дана непустая последовательность символов. Требуется построить и напечатать множество, элементами...

Программа для вывода на экран знаков препинания(с указанием их АСКИ-кода) знаков препинания
Напишите и отладьте программу для вывода на экран(с указанием их АСКИ -кода) знаков препинания

Построить и напечатать множество, элементами которой есть символы 0..9 встречающихся в последовательности
Дана последовательность символов. Построить и напечатать множество, элементами которой есть символы...

1
Kordn
156 / 135 / 106
Регистрация: 18.05.2013
Сообщений: 289
22.06.2013, 14:29 2
Лучший ответ Сообщение было отмечено Чадин Александр как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
var ch: set of char;
c: char;
i: integer;
begin
ch:=[];
repeat
read(c);
if c in ['!',',','.','?','/','*','^',':','(',')','-','+','=',';'] then ch:=ch+[c];
until c='%';   //ââîä äî çíàêà %
for i:=0 to 255 do
if chr(i) in ch then writeln(chr(i));
end.
1
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
22.06.2013, 14:29

Умножение на 9 без арифметических знаков
Нужно написать прогу умножения на 9 любого числа, но без арифметических знаков + - * / Я так понял...

Доделать программу на количество знаков препинания!!!
Это программа, которая находит количество знаков препинания в заданной символьной строке ...

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


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

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

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