Написать программу находящую количество цифр вводимого неотрицательного положительного числа

Ответы:
Ira Kravchenko
13-08-2016 18:02

var  a, c : integer;begin  readln (a);  c := 0;  if (a = 0) then c := 1  else    while a <> 0 do    begin      c := c + 1;      a := a div 10;     end;  writeln (c);end.

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя Mitya Lomakin

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Написать программу находящую количество цифр вводимого неотрицательного положительного числа» от пользователя Mitya Lomakin в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!