Question

Дано натуральное число x<=999. Определить: Сколько цифр в этом числе.
Паскаль

Answer 1

Ответ:

begin

 var number := ReadInteger('Введите число:');

 var numberStr := IntToStr(number);

 var count := Length(numberStr);

 

 Println('В числе цифр:', count);

end.