Составьте алгоритм для определения количества цифр в записи произвольного натурального числа (для программы Паскаль)

intToStr - только в Pascal.ABC, в прочих паскалях её нет.

В паскаль ABC тип integer = longint, но все равно при вводе чиcла, большего 2 147 483 647 "бомбочка" рванет...

var x:integer;beginreadln(x);writeln(length(inttostr(x)))end.