Дано целое число N. Составить программу нахождения количества цифр числа (Pascal ABC)

Question

Информатика

Михей

18 июля, 14:15

Дано целое число N. Составить программу нахождения количества цифр числа (Pascal ABC)

+1

Ответы (1)

Знаете ответ?

Аннушка · Answer 1

Var

a:longint;

s:string;

begin

writeln ('Введите целое число') ;

readln (a) ;

Str (a, s) ;

writeln ('Количество цифр в числе равно ', length (s)) ;

end.