Язык программирования - паскаль ввести целое число и определить количество цифр в нем. так же дан алгоритм: отсекаем последнюю цифру, при этом увеличиваем счетчик на единицу. надо остановиться, пока n< > 0. буду (:

nikitavor7135 nikitavor7135    2   27.06.2019 00:20    0

Ответы
Новичок1532 Новичок1532  02.10.2020 12:33
Var
 n,i : integer;
begin
  readln(n);
  i := 0;
  while(n <> 0) do
  begin
     n := n div 10;
     i := i+1;
  end;
  Writeln(i);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика