Написать подпрограмму для поиска максимального из всех двухзначных чисел в строке. Если в строке нет ни одного двухзначного числа, то подпрограмма должна вернуть 0.function CalcMax(s:string):integer; с процедурой val
подпрограмма поиска максимального из всех двухзначных чисел в строке
PascalABC.NET