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

В строке заменить все точки '.' восклицательными знаками '!' - Pascal

15.05.2010, 04:34. Просмотров 1818. Ответов 2
Метки нет (Все метки)

(Знатоки Паскаля поможете?) В строке заменить все точки '.' восклицательными знаками '!' Подсчитать количество замен.
http://www.cyberforum.ru/pascal/thread191636.html
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
15.05.2010, 04:34
Я подобрал для вас темы с готовыми решениями и ответами на вопрос В строке заменить все точки '.' восклицательными знаками '!' (Pascal):

Заменить все символы C в строке S на S1
Даны строки S и S1, а так же символ C. Заменить все символы C в строке S на S1

Заменить в третьем столбце все отрицательные элементы нулями, все положительные элементы в 5-й строке их квадратами
переведите на паскаль Дан массив R (M, N). Заменить в третьем столбце все...

Заменить в третьем столбце все отрицательные элементы нулями, все положительные элементы в 5-й строке их квадратами
Дан массив R (M, N). Заменить в третьем столбце все отрицательные элементы...

В строке заменить все пары букв РН на Р.
В строке заменить все пары букв РН на Р. uses crt; var s:string; ...

Заменить все буквы a на q в строке из 25 символов
Срочно нужна помощь, не допускают до сессии!!! Нужно написать программу: 1....

2
NickA
35 / 34 / 17
Регистрация: 28.04.2009
Сообщений: 67
15.05.2010, 04:40 #2
Лучший ответ Сообщение было отмечено DRGNforce как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var
  i, c: integer;
  s: string;
begin
  c:=0;
  write('Input string: '); readln(s);
  for i:=1 to length(s) do
    if s[i]='.' then
      begin
        s[i]:='!';
        inc(c);
      end;
  writeln('Result: ',s,' ; replace ',c,' items';
end.
1
DRGNforce
0 / 0 / 0
Регистрация: 15.05.2010
Сообщений: 18
15.05.2010, 04:48  [ТС] #3
Спасибо Огромное!
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
15.05.2010, 04:48
Привет! Вот еще темы с решениями:

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

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

Заменить в строке все цифры на символ буквы А
Задана строка в длину 15, заменить в строке все цифры на символ буквы А

В заданной строке заменить все двоеточия точкой с запятой
Работа со строками В заданной строке заменить все двоеточия ( : ) точкой с...


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

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

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