• Вопрос по информатике:

    Составить программу, которая определяет однозначные, двухзначные, трехзначные, четырехзначные или пятизначные
    Язык: ABCPascal

    • Автор:

      haven

  • var a,b:integer; {a-число, b-количество знаков числа}

    begin

    readln(a);

    while a<>0 do

     begin

       b:=b+1;

       a:=a div 10;

     end;

     writeln(b);

    end.

    • Отвечал:

      gustavoperkins
    • 0

    Ответов нет, но ты это испарвиш!

Еще 4 ненужных тебе вопроса, но это важно для поиска