Написать подпрограмму, которая все слова вида "amp;lt;естественное числоamp;gt;+amp;lt;натуральное
Написать подпрограмму, которая все слова вида "lt;натуральное числоgt;+lt;естественное числоgt;" поменяет на результат операции. К примеру: строчка " undg 45+2 jf 100+1" должна быть преобразована в строку " undg 47 jf 101" Использовать заголовок: procedure Summ(var s: string);
pascalABC
// PascalABC.NET 3.4.2, сборка 1790 от 15.09.2018
// Внимание! Если программа не работает, обновите версию!
reference System.Data.dll
uses System.Data;
procedure Summ(var s: string);
begin
var o := new DataTable;
s := s.RegexReplace('\d+\+\d+', m -gt; o.Compute(m.Value, '').ToString)
end;
begin
var s := ReadlnString('Введите строчку:');
Summ(s);
s.Println
end.
-
Вопросы ответы
Статьи
Информатика
Статьи
Математика.
Физика.
Математика.
Разные вопросы.
Разные вопросы.
Математика.
Разные вопросы.
Математика.
Физика.
Геометрия.