Задать вопрос
18 мая, 07:45

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

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

+1
Ответы (1)
  1. 18 мая, 08:00
    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
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Написать функцию нахождения кол-ва цифр через рекурсию. Паскаль. Рекурсия. Через функцию. ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы