// PascalABC.NET 3.1, сборка 1239 от 08.05.2016 begin var s:=ReadlnString('Введите число, отделяя дробную часть запятой:'); s:=Trim(s); // мало ли... var p:=Pos(',',s); if p>0 then Writeln('Цифр в дробной части числа: ',s[p:].Length-1) else Writeln('Запятой в числе не найдено') end.
Тестовое решение Введите число, отделяя дробную часть запятой: 423,56324 Цифр в дробной части числа: 5
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
