составить программу определения количества цифр в целом числе
ps; код программы паскаль.

НЕ проще. Целое число может быть отрицательным))

Ну и еще: в том же Турбо Паскале нет IntToStr, там процедура Str.

v TurboPascal s konvertaciej tipov voobwe vse slozhno. a na sluchaj otricatelnosti mozho Abs(i) dobavit

var  i: integer;begin  readln(i);  writeln(Length(IntToStr(i)));end.Можно было циклом убирать по циферке, но проще перевести число в строку, а затем найти её длину:)