В некотором натуральном...

Тема в разделе "Информатика", создана пользователем dante, 26 мар 2010.

  1. dante

    dante New Member

    В некотором натуральном числе n посчитать кол-во цифр.Пожалуйста помогите!
     
    dante, 26 мар 2010
    #1
  2. allla

    allla New Member

    Uses crt;
    var a,k:integer;
    begin
         wrute('Введи число: ');
         readln(a);
         repeat
         a:=a div 10;
         inc(k);
         until a=0;
         writeln('Количество цифр: ',k);
    end.
     
    allla, 26 мар 2010
    #2

Поделиться этой страницей

Наша группа