Перейти к содержимому

Адай_ис

Адай_ис

Регистрация: 17.12.2009, 22:46
Offline Активность: 03.01.2010, 21:39
-----

В теме: НАЧИНАЮЩИЙ ПРОГРАММИСТ

22.12.2009, 16:02:53

Ну да вы правы,просто мне захотелось проверить.

В теме: НАЧИНАЮЩИЙ ПРОГРАММИСТ

21.12.2009, 17:29:37

Delphi:

uses math;

function PCount(Num : Int64): Int64;
var
i,len,a,b, col : Integer;
begin
a := 1;
b := 1;
col := 0;
len := Trunc(Log10(Num))+1;
for i := 1 to len - 1 do
begin
col := col + a * 9;
if (i mod 2) = 0 then
a := a * 10
else
b := b * 10;
end;
result := col + (Num div a) - b + 1;
end;


Вот решение на С++

void main () {


int N,i,k=0,j,a=1,b=1;
cin>>N;
div_t s;
int res;
j=ceil(log(N)/log(10));
for(i=1;i<=j;i++)
{

k+=a*9;
if(i%2==0)

{
a*=10;
}
else b*=10;
}

s=div(N,a);

res=k+s.quot-b+1;
cout<<j<<endl;
cout<<res;

}

Размещение рекламы на сайте     Предложения о сотрудничестве     Служба поддержки пользователей

© 2011-2022 vse.kz. При любом использовании материалов Форума ссылка на vse.kz обязательна.