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

Составить программу для замены в строке длиной К символов каждого второго символа ! На $

04.06.2012, 10:35. Просмотров 757. Ответов 7
Метки нет (Все метки)

1)Ввести с клавиатуры строку символов. Признак окончания ввода строки – нажатие клавиши "Ввод". Составить программу для замены в строке длиной К символов каждого второго символа ! на $.
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
04.06.2012, 10:35
Ответы с готовыми решениями:

Определить общее число вхождений двух повторяющихся символов для каждого символа, встречающегося в исходной строке
Дана строка s, содержащая менее чем 256 символов. Определить общее число вхождений двух...

Определить общее число вхождений двух повторяющихся символов для каждого символа, встречающегося в исходной строке
Помогите с двумя задачами на строки 1)Дана строка s, содержащая менее чем 256 символов....

Ввести с клавиатуры строку символов. Составить программу для замены в данной строке всех пробелов на символ $
Ввести с клавиатуры строку символов. Составить программу для замены в данной строке всех пробелов...

Замена каждого второго символа в строке
Дана строка "привет всем" . Надо заменить каждый второй символ на "и".

Реализовать программу для поиска и замены символов в строке
прошу помощи, задания : 1) Напишите функцию поиска символа в строке с такой сигнатурой: char...

7
klast
тыдыщ
204 / 187 / 166
Регистрация: 19.01.2011
Сообщений: 476
04.06.2012, 10:49 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Цитата Сообщение от Joker22 Посмотреть сообщение
1)Ввести с клавиатуры строку символов. Признак окончания ввода строки – нажатие клавиши "Ввод". Составить программу для замены в строке длиной К символов каждого второго символа ! на $.
Pascal
1
2
3
4
5
6
7
8
9
10
11
var
  s: string;
  k, i: integer;
 
begin
  write('Введите строку: '); readln(s);
  write('Введите число К: '); readln(k);
  for i := 1 to k do
    if s[i] = '!' then s[i] := '$';
  writeln(s);
end.
1
morgan57
42 / 42 / 33
Регистрация: 05.12.2011
Сообщений: 201
04.06.2012, 10:56 3
2 код абсолютно неверен
1
Joker22
0 / 0 / 1
Регистрация: 31.05.2012
Сообщений: 16
04.06.2012, 10:56  [ТС] 4
Огромное спасибо!
0
04.06.2012, 10:56
klast
тыдыщ
204 / 187 / 166
Регистрация: 19.01.2011
Сообщений: 476
04.06.2012, 11:10 5
morgan57, хм
подается строка, в этой строке в К первых символов делаем замену
или я что-то не понял?
0
TheSN
153 / 95 / 101
Регистрация: 25.02.2012
Сообщений: 232
04.06.2012, 11:17 6
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
  { Первая }
const
  k = 10; // ограничение на количество символов
 
var
  s: string;
  n, i: integer;
 
begin
  repeat
    writeln('Введите строку (символов - ', k, '):');
    readln(s)
  until length(s) = k;
  for i := 1 to k do 
    if s[i] = '!' then begin
      inc(n);
      if n mod 2 = 0 then s[i] := '$'
    end;
  writeln(s);
  readln
end.
klast, надо было заменять каждый второй символ, а не все.
2
klast
тыдыщ
204 / 187 / 166
Регистрация: 19.01.2011
Сообщений: 476
04.06.2012, 11:29 7
TheSN, хотя все равно не всосал зачем нам число К тогда
0
klast
тыдыщ
204 / 187 / 166
Регистрация: 19.01.2011
Сообщений: 476
04.06.2012, 11:40 8
Цитата Сообщение от Joker22 Посмотреть сообщение
Составить программу для замены в строке длиной К символов каждого второго символа ! на $
про отдельные слова здесь не сказано ни слова
0
04.06.2012, 11:40
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
04.06.2012, 11:40

Оставить в строке фрагменты, симметричные центрального символа, длиной более 5 символов
Не получается то, что должно получится. В задаче следует: Оставить в строке фрагменты, симметричные...

Оставить в строке фрагменты, симметричные центрального символа, длиной более 5 символов
Не могу понять почему при реализации у меня распечатывается одно и тоже несколько раз, хотя по...

Оставить в строке фрагменты, симметричные центрального символа, длиной более 5 символов
(СИ)Оставить в строке фрагменты, симметричные центрального символа, длиной более 5 символов...


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

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

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