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

@faruh · Регистрация: 28.01.2011

Author24 — интернет-сервис помощи студентам

В последовательности символов, предшествующих символу / найти и заменить все символы , расположенные между скобками ( ) символами ?.

@Quiet Snow · 06.02.2011, 18:25

PureBasic

CLS
 DIM S AS STRING, R AS STRING, C AS STRING * 1
 INPUT "Vvedite stroku:", S
   FOR i = 1 TO LEN(S)
    C = MID$(S, i, 1)
    IF C = "(" THEN f = f + 1
    IF C = ")" THEN f = f - 1
    IF C = "/" THEN z = 1
    IF f > 0 AND C <> "(" AND C <> ")" AND z = 0 THEN C = "?"
    R = R + C
   NEXT
 PRINT "Result: "; R

@Shkap · 06.02.2011, 19:23

Не по теме:

КС с назначением тя

@Quiet Snow · 06.02.2011, 20:22

КС с назначением тя

Не по теме:

Угу, спасибо, я и сам не ожидал. Теперь в разделе не побезумствуют, а то ишь.

@faruh 0 / 0 / 0 Регистрация: 28.01.2011 Сообщений: 39
		1
	Заменить символы в строке, расположенные между скобками. 28.01.2011, 09:56. Показов 1387. Ответов 3 Метки нет (Все метки) В последовательности символов, предшествующих символу / найти и заменить все символы , расположенные между скобками ( ) символами ?. 0

@Shkap
	06.02.2011, 19:23 #3
	Не по теме: КС с назначением тя 0

@Quiet Snow 5001 / 1673 / 409 Регистрация: 25.04.2010 Сообщений: 4,625 Записей в блоге: 2
	06.02.2011, 20:22	4
	КС с назначением тя Не по теме: Угу, спасибо, я и сам не ожидал. Теперь в разделе не побезумствуют, а то ишь. 0