дано натуральне число n. визначте кльксть цифр у цьому числ

Дано натуральне число n. визначте кльксть цифр у цьому числ

Задать свой вопрос
1 ответ
  var m, n: longint;
  k: integer;
  begin 
writeln('Введите число:'); 
 readln(n); 
 m:=n; 
 k:=0;
 while m lt;gt;0 do  
   begin   
   inc(k);
m:= m div 10;  
 end;
  writeln('B числе ',k, ' цифр'); 
 readln;
end.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт