Ответ:
begin
//PascalABC.NET 3.8.2
var str := readstring();
if str.Contains('{') and str.Contains('}') and ((str.IndexOf('}') - str.IndexOf('{') + 1) > 0) then
str.Remove(str.IndexOf('{'), str.IndexOf('}') - str.IndexOf('{') + 1).Println;
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
begin
//PascalABC.NET 3.8.2
var str := readstring();
if str.Contains('{') and str.Contains('}') and ((str.IndexOf('}') - str.IndexOf('{') + 1) > 0) then
str.Remove(str.IndexOf('{'), str.IndexOf('}') - str.IndexOf('{') + 1).Println;
end.