0 / 0 / 0
Регистрация: 07.11.2018
Сообщений: 8
1

Удалить все знаки препинания

22.11.2019, 07:40. Показов 2079. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Изменить программу так, чтобы удалились все знаки препинания.
Pascal
1
2
3
4
5
6
7
8
9
10
11
var s, p:string; i, k:integer;
begin
p:='.,!? - :' ;
write('Введите текст:') ;
read(s) ;
k:=0;
for i:=1 to length(s) do
if pos(s[i], p) <>0
then k:=k+1;
writeln('Кол-во знаков препинания в тексте=', k) ;
end.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
22.11.2019, 07:40
Ответы с готовыми решениями:

Изменить данную программу организовав чтение исходных данных из текстового файла изменить размерность массива на квадратную матрицу 5х5
Изменить данную программу организовав чтение исходных данных из текстового файла изменить...

Изменить программу
Просьба изменить программу так, чтобы она работала для ф-ции: f(х)=sin*sinX для ф-ции синус квадрат...

Изменить программу
Program v1; uses crt; var a: array of integer; i, n: byte; x: integer; begin n := 0; repeat...

Изменить программу
Изменить программу так, чтобы она удаляла все знаки препинания

1
Почетный модератор
64299 / 47594 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
22.11.2019, 07:50 2
Pascal
1
2
3
4
5
6
7
8
9
10
11
var s,p:string;
    i:integer;
begin
p:='.,!? - :' ;
write('Введите текст:') ;
readln(s) ;
for i:=length(s)downto 1 do
if pos(s[i], p) <>0
then delete(s,i,1);
writeln(s) ;
end.
0
22.11.2019, 07:50
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
22.11.2019, 07:50
Помогаю со студенческими работами здесь

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

Надо изменить программу
Вот задание: Дана квадратная матрица А порядка n. Составить программу, которая находит...

Помгите изменить рекурсивную программу.
Есть программа, печатающая квадраты всех целых чисел от нуля до введённого натурального n, не...

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


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

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

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