Задать вопрос
25 мая, 14:14

Написать функцию нахождения кол-ва цифр через рекурсию. Паскаль. Рекурсия.

Через функцию.

+1
Ответы (1)
  1. 25 мая, 14:28
    0
    Var a:integer;

    function k (n:integer) : integer;

    begin

    if n<10

    then k:=1

    else k:=k (n div 10) + 1;

    end;

    begin

    write ('a = ') ;

    readln (a) ;

    writeln ('Количество цифр = ', k (a)) ;

    end.

    Пример:

    a = 134652

    Количество цифр = 6
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Написать функцию нахождения кол-ва цифр через рекурсию. Паскаль. Рекурсия. Через функцию. ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы