Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.89/9: Рейтинг темы: голосов - 9, средняя оценка - 4.89
0 / 0 / 0
Регистрация: 27.05.2012
Сообщений: 14
1

Дана строка символов. Заменить все вхождения символа '{' на 'begin' , а каждое вхождение символа '}' - на 'end'

31.05.2012, 23:27. Показов 1717. Ответов 2
Метки нет (Все метки)

дана строка символов. Заменить все вхождения символа '{' на 'begin' , а каждое вхождение символа '}' - на 'end'


блок-схему плиз!
0
Лучшие ответы (1)
Заказывайте контрольные, курсовые и дипломы здесь.
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
31.05.2012, 23:27
Ответы с готовыми решениями:

Дана строка символов. Заменить все вхождения символа ‘{’ на ‘begin’, а каждое вхождение символа ‘}’ – на ‘end’
3. Дана строка символов. Заменить все вхождения символа ‘{’ на ‘begin’, а каждое вхождение символа...

Дана строка S и символ C. Удвоить каждое вхождение символа C в строку S.
Дана строка S и символ C. Удвоить каждое вхождение символа C в строку S.

Строка: Удвоить каждое вхождение символа C в строку S.
Задано строка S и символ C. Удвоить каждое вхождение символа C в строку S.

Дан символ C и строка S. Удвоить каждое вхождение символа C в строку S
помогите, пожалуйста... Дан символ C и строка S. Удвоить каждое вхождение символа C в строку S.

2
Фрилансер
3411 / 2808 / 3000
Регистрация: 08.02.2012
Сообщений: 8,030
Записей в блоге: 1
01.06.2012, 07:44 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Var s:string;
    i,j:integer;
Begin
    write('Введите строку: ');readln(s);
    j:=Length(s);i:=0;
    While i<j do
     Begin
      inc(i);
      if s[i]='{' then 
       Begin
        Delete(s,i,1);
        Insert('Begin',s,i);
       End;
      if s[i]='}' then 
       Begin
        Delete(s,i,1);
        Insert('End',s,i);
       End;
      j:=Length(s);
      End;
     writeln('Полученная строка: ',s);
End.
На счёт блок схемы либо сам учусь рисовать либо скачай прогу для этого
1
0 / 0 / 0
Регистрация: 27.05.2012
Сообщений: 14
02.06.2012, 02:12  [ТС] 3
не подскажешь что за прога?

Добавлено через 2 часа 2 минуты
спасибо за код, прогу нашел сам
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
02.06.2012, 02:12

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

Заменить все вхождения символа «пробел» на два символа «пробел»
Дана строка символов. Заменить все вхождения символа «пробел» на два символа «пробел».

Преобразовать каждое слово в строке, удалив из него все вхождения заданного символа
Помогите решить! Дана строка, состоящая из символов латинского алфавита, разделенных пробелами...

Заменить все вхождения символа С1 в строку S на С2
Дана символьная строка S, символы С,C. Заменить все вхождения символа С1в строку S на С2. ...

Заменить в четных строках все вхождения символа 'a' на 'b'
Дан текст из десяти строк. Заменить в четных строках все вхождения символа 'a' на 'b', а в...


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

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

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