Напишите функцию, которая вычисляет количество цифр числа

den111111111113 den111111111113    3   18.07.2019 11:20    2

Ответы
sertarsertar205 sertarsertar205  25.08.2020 10:14
Function kolich (a: integer):integer
Begin
Integer i;
I:=1
While (a div 10 > 0) do
Begin
i:=i+1;
a:=a div 10;
End;
Kolich:=i;
End
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика