Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
ВолодяН
1 / 1 / 0
Регистрация: 19.04.2011
Сообщений: 23
#1

Заменить букву в предложении восклицательным знаком - Turbo Pascal

19.04.2011, 08:47. Просмотров 514. Ответов 2
Метки нет (Все метки)

Помагите пожалуйста с задачай!!!!
Предложение произвольной длины вводится с клавиатуры. Если в этом предложении первая буква встречается более 3-х раз, заменить эту букву в предложении восклицательным знаком и напечатать новое предложение....
http://www.cyberforum.ru/turbo-pascal/thread272632.html
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
19.04.2011, 08:47
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Заменить букву в предложении восклицательным знаком (Turbo Pascal):

Заменить каждую букву «а» предшествующем символом. Если буква «а» первая, то заменить ее на последнюю.
Напишите пожалуйста решение!СПАСИБО! Заменить каждую букву «а» предшествующем...

Указать долю гласных. Заменить многоточие ? знаком
В файле f1 набран текст. Для каждого слова заданного предложения указать долю...

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

Подсчитать количество слов в предложении, начинающихся на букву t
3. Составить программу, которая посчитает количество слов в предложении,...

Определить на какую букву заканчивается последнее слово в предложении
определить на какую букву заканчивается последнее слово в предложении

2
KaiTheCat
К.О.
531 / 496 / 344
Регистрация: 26.03.2011
Сообщений: 1,141
19.04.2011, 09:25 #2
Лучший ответ Сообщение было отмечено ВолодяН как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
var
  st: string;
  ch: char;
  i,k: integer;
Begin
  readln(st);
  ch:=st[1];
  k:=0;
  for i:=1 to length(st) do
    if st[i]=ch then inc(k);
  if k>3 then
    for i:=1 to length(st) do
      if st[i]=ch then st[i]:='!';
  writeln(st);
  readln;
End.
1
Puporev
19.04.2011, 09:48     Заменить букву в предложении восклицательным знаком
  #3
 Комментарий модератора 
Помагите с программой
Читай правила, еще одно подобное название темы, начну репрессии.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
19.04.2011, 09:48
Привет! Вот еще темы с ответами:

Найти в предложении слова, которые начинаются на одну и ту же букву
Тема: Строки. Множества. 3.1. Найти в предложении слова, которые начинаются на...

В произвольном предложении зашифровать любую букву или слово
Здравствуйте!Помогите с написанием программы.Программа звучит так:"В...

Подсчитать количество слов в предложении, содержащих указанную букву
Ввести произвольное предложение с клавиатуры; ввести букву с клавиатуры;...

Определить на какую букву оканчивается четвертое слово в предложении.
1. В строке слова разделены пробелами. Определить на какую букву оканчивается...


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

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

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