Определение нечётных чисел в строке - PascalABC.NET
Формулировка задачи:
Строка состоит из различных символов(буквы,числа,любые знаки) определить нечётные числа и удалить всё что находиться между ними.
Решение задачи: «Определение нечётных чисел в строке»
textual
Листинг программы
begin
var re := '(\d*[13579])(?!\d)(?:.+(?<!\d)(\d*[13579])(?!\d)|)';
var str := ReadlnString('Ввести стоку:');
var m := Regex.Match(str, re);
writeln('Первое нечётное число=', m.Groups[1]);
writeln('Последнее нечётное число=', m.Groups[2]);
writeln('Полученная строка:', Regex.Replace(str, re, '$1$2'));
end.
Ввести стоку: +12 123a%bc 541 945 700
Первое нечётное число=123
Последнее нечётное число=945
Полученная строка:+12 123945 700
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д