Вопрос, который вызвал трудности
Напишете программу ,которая вычисляет количество цифр числа. Используйте функцию.
Помогите пожалуйста.
Буду очень благодарна.
Ответ экспертов Учись.Ru
Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме.
После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:
Var
n:integer;
function kol(n:integer):integer;
var k:integer;
begin
k:=0;
while n>0 do
begin
k:=k+1;
n:=n div 10;
end;
kol:=k;
end;
begin
write('n = '); readln(n);
writeln('k = ',kol(n));
end.
Пример:
n = 123456
k = 6