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

georgyudin2005 georgyudin2005    2   02.06.2019 22:00    5

Ответы
vika3443 vika3443  03.07.2020 13:29
Function kol(n:integer):integer;
var
   kol1:integer;
begin
   kol1:=0;
   repeat
      kol1:=kol1+1;
      n:=n div 10;
   until n=0;
   kol:=kol1;
end;
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика