Помогите пожалуйста дорешать задачу! Задача: "Посчитать количество цифр в заданном числе".Число можно взять любое,но было бы лучше, если бы оно состояло из 4-5 цифр.Нужно расписать каждый проделанный шаг..Очень надеюсь на вашу помощь
More Questions From This User See All
Answers & Comments
begin
write('a = '); readln(a);
k:=0;
while (a<>0) do
begin
a:=a div 10;
k:=k+1;
end;
writeln('количество цифр = ',k);
end.