Код:
Функция КоличествоЦелыхЧиселВСтроке(Строка) ЧислоСлов = 0; КоличествоЧисел = 0; ПолученнаяСтрока = СтрЗаменить(СокрЛП(Строка), " ", Символы.ПС); Для Сч = 1 ПО СтрЧислоСтрок(ПолученнаяСтрока) Цикл ТекСтрока = СтрПолучитьСтроку(ПолученнаяСтрока, Сч); Если НЕ ПустаяСтрока(ТекСтрока) Тогда Попытка Число = Число(ТекСтрока); //цел() КоличествоЧисел = КоличествоЧисел + 1; Исключение КонецПопытки; КонецЕсли; КонецЦикла; Возврат КоличествоЧисел; КонецФункции КоличествоЧисел =...