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

Question

Информатика

Ана

15 апреля, 23:05

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

+4

Ответы (1)

Знаете ответ на вопрос?

Эмилий · Answer 1

Var

a:longint;

s:string;

begin

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

readln (a) ;

Str (a, s) ;

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

end.