Удалить часть символьной строки, заключенный в скобки(вместе со скобками).

@Эльвир35 · Регистрация: 18.01.2010

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

@Puporev · 26.01.2010, 11:12

Pascal

uses crt;
var s:string;
i:byte;
begin
clrscr;
writeln('Stroka:');
readln(s);
while (pos('(',s)>0)and(pos(')',s)>0) do {пока есть пары скобок}
delete(s,pos('(',s),pos(')',s)-pos('(',s)+1);{удаляем их и то что внутри}
write(s);
readln;
end.

24.05.2011, 16:35

Private Sub Command1_Click()
Dim s, s1, notk, nz As String
s = Text1.Text
For i = 1 To Len(s)
If Mid(s, i, 1) = "(" Then notk = i
If Mid(s, i, 1) = ")" Then nz = i
Next i
s1 = Mid(s, 1, notk - 1)
s1 = s1 + Mid(s, nz + 1, Len(s) - (nz + 1))
Label2.Caption = s1
End Sub

Язык VB6

Новые блоги и статьи
Русский язык в консоли C++ InfoMaster 08.01.2025 При разработке программ на C++ одной из частых проблем, с которой сталкиваются русскоязычные программисты, является корректное отображение кириллицы в консольных приложениях. Эта проблема особенно. . .	Telegram бот на C# InfoMaster 08.01.2025 Разработка ботов для Telegram стала неотъемлемой частью современной экосистемы мессенджеров. C# предоставляет мощный и удобный инструментарий для создания разнообразных ботов, от простых. . .	Использование GraphQL в Go (Golang) InfoMaster 08.01.2025 Go (Golang) является одним из наиболее популярных языков программирования, используемых для создания высокопроизводительных серверных приложений. Его архитектурные особенности и встроенные. . .	Что лучше использовать при создании класса в Java: сеттеры или конструктор? Alexander-7 08.01.2025 Вопрос подробнее: На вопрос: «Когда одновременно создаются конструктор и сеттеры в классе – это нормально?» куратор уточнил: «Ваш класс может вообще не иметь сеттеров, а только конструктор и геттеры. . .	Как работать с GraphQL на TypeScript InfoMaster 08.01.2025 Введение в GraphQL и TypeScript В современной разработке веб-приложений GraphQL стал мощным инструментом для создания гибких и эффективных API. В сочетании с TypeScript, эта технология. . .	Счётчик на базе сумматоров + регистров и генератора сигналов согласования. Hrethgir 07.01.2025 Создан с целью проверки скорости асинхронной логики: ранее описанного сумматора и предополагаемых fast регистров. Регистры созданы на базе ранее описанного, предполагаемого fast триггера. То-есть. . .
Как перейти с Options API на Composition API в Vue.js BasicMan 06.01.2025 Почему переход на Composition API актуален В мире современной веб-разработки фреймворк Vue. js продолжает эволюционировать, предлагая разработчикам все более совершенные инструменты для создания. . .	Архитектура современных процессоров inter-admin 06.01.2025 Процессор (центральный процессор, ЦП) является основным вычислительным устройством компьютера, которое выполняет обработку данных и управляет работой всех остальных компонентов системы. Архитектура. . .	История создания реляционной модели баз данных, правила Кодда Programming 06.01.2025 Предпосылки создания реляционной модели В конце 1960-х годов компьютерная индустрия столкнулась с серьезными проблемами в области управления данными. Существовавшие на тот момент модели данных -. . .	Полезные поделки на Arduino, которые можно сделать самому raxper 06.01.2025 Arduino как платформа для творчества Arduino представляет собой удивительную платформу для технического творчества, которая открывает безграничные возможности для создания уникальных проектов. Эта. . .	Подборка решений задач на Python IT_Exp 06.01.2025 Целью данной подборки является предоставление возможности ознакомиться с различными задачами и их решениями на Python, что может быть полезно как для начинающих, так и для опытных программистов. . . .	С чего начать программировать микроконтроллеры raxper 06.01.2025 Введение в мир микроконтроллеров Микроконтроллеры стали неотъемлемой частью современного мира, окружая нас повсюду: от простых бытовых приборов до сложных промышленных систем. Эти маленькие. . .

@Эльвир35 0 / 0 / 0 Регистрация: 18.01.2010 Сообщений: 25
		1
	Удалить часть символьной строки, заключенный в скобки(вместе со скобками). 26.01.2010, 08:59. Показов 4864. Ответов 2 Метки нет (Все метки) Удалить часть символьной строки, заключенный в скобки(вместе со скобками). 0

chuyock
	24.05.2011, 16:35	3
	Private Sub Command1_Click() Dim s, s1, notk, nz As String s = Text1.Text For i = 1 To Len(s) If Mid(s, i, 1) = "(" Then notk = i If Mid(s, i, 1) = ")" Then nz = i Next i s1 = Mid(s, 1, notk - 1) s1 = s1 + Mid(s, nz + 1, Len(s) - (nz + 1)) Label2.Caption = s1 End Sub Язык VB6

Удалить часть символьной строки, заключенный в скобки(вместе со скобками).

Решение