Написать программку, реализующую ввод числа и определение его длины.

Написать программу, реализующую ввод числа и определение его длины.

Задать свой вопрос
Никита Левитман
язык?)
Иван Янковой
скорее всего целое число, на разряды, но не уточнила ничего)
1 ответ
Var a,n:integer;
begin
readln(a);
n:=0;
While agt;0 do
Begin
a:=a div 10;
n:=n+1;
end;
writeln(n);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт