LockeD [Off] [#] (03.02.2012 / 20:45) ████████████ - сотри и прочитай мой статус

maXomaRa (03.02.2012/20:38)
ПИРООООООООООООООООООООООООГ!!! ЕБАТЬ КАК Я ЛЮБЛЮ ПИРОГ!*покерфейц* не сри в сурёзнай теме

LockeD [Off] [#] (03.02.2012 / 20:49) ████████████ - сотри и прочитай мой статус

ramzes (03.02.2012/20:38)

n = ???;
k = ???;
if(strlen(k) < 10){
n = strlen(k);
}else{
s = strlen(k);
a = s - 9;
n = (a / 2) + 9;
}
print n;

я ни фига не понял задачу, и даже не хочу понимать, но то чтопо поводу разрядности - да, а лимит должен входить в longint

ramzes [Off] [#] (03.02.2012 / 20:53) Крайне позитивный раздолбай

LockeD (03.02.2012/20:49)
по поводу разрядности - да, а лимит должен входить в longint99 участников дадут 181значное число,так что такой лимит за глаза.
в общем попробуй.
суть в следующем.
если меньше 10 сиволов, то 1 участник = 1 символ (1,2,3, и т.д.)
если больше, то 9 из них, с номерами в 1 знак, а все остальные, с номерами в два знака.
как то так

maXomaRa [Off] [#] (03.02.2012 / 20:54)

LockeD (03.02.2012/20:45)
*покерфейц* не сри в сурёзнай темеЕБАТЬ КАК Я ЛЮБЛЮ СРАТЬ

LockeD [Off] [#] (03.02.2012 / 20:58) ████████████ - сотри и прочитай мой статус

ramzes (03.02.2012/20:53)
99 участников дадут 181значное число,так что такой лимит за глаза.
в общем попробуй.
суть в следующем.
если меньше 10 сиволов, то 1 участник = 1 символ (1,2,3, и т.д.)
если больше, то 9 из них, с а почему 10 - ошибочное значение?

ramzes [Off] [#] (03.02.2012 / 20:59) Крайне позитивный раздолбай

10 не должно получаться.
9 чисел + десятый еще 2 числа, и того 11

LockeD [Off] [#] (03.02.2012 / 21:00) ████████████ - сотри и прочитай мой статус

maXomaRa (03.02.2012/20:54)
ЕБАТЬ КАК Я ЛЮБЛЮ СРАТЬзасранец

ramzes [Off] [#] (03.02.2012 / 21:03) Крайне позитивный раздолбай

Кстати я соврал, 99 участников это 189значное число.
189 - 9 = 180 (99-9 = 90) // отнимаем первых 9 участников
180 / 2 = 90 // оставшиеся 90, с двухзначными номерами

Monk [Off] [#] (03.02.2012 / 21:03)

короче такая хрень:
program GW;
var i, k, l: integer;
n: int64;
begin
write('write N ');
readln(N);
i:=0;
l:=1;
while N div l > 0 do
begin
i:= i+1;
l:= l*10;
end;
k:=0;
l:=1;
while i >= 0 do
begin
k:= k+1;
if (k=9) or (k=99) or (k=999) then
l:= l+1;
i:= i-l;
end;
writeln('k = ', k);
end.
то что понял

LockeD [Off] [#] (03.02.2012 / 21:04) ████████████ - сотри и прочитай мой статус

ramzes (03.02.2012/20:59)
10 не должно получаться.
9 чисел + десятый еще 2 числа, и того 11точно!)
Пойдука я спать, а то чет совсем туплю

LockeD [Off] [#] (03.02.2012 / 21:07) ████████████ - сотри и прочитай мой статус

Monk (03.02.2012/21:03)
короче такая хрень:
program GW;
var i, k, l: integer;
n: int64;
begin
write('write N ');
readln(N);
i:=0;
l:=1;
while N div l > 0 do
begin
i:= i+1;
l:= l*10;
end;
k:=0;
l:=1;
while i >завтра попытаюсь осилить, кст n - longint

ramzes [Off] [#] (03.02.2012 / 21:09) Крайне позитивный раздолбай

Monk (03.02.2012/21:03)
короче такая хрень:
program GW;
var i, k, l: integer;
n: int64;
begin
write('write N ');
readln(N);
i:=0;
l:=1;
while N div l > 0 do
begin
i:= i+1;
l:= l*10;
end;
k:=0;
l:=1;
while i >php великолепный язык на нем я это в три строчки сделаю

Monk [Off] [#] (03.02.2012 / 21:11)

LockeD (03.02.2012/21:07)
завтра попытаюсь осилить, кст n - longintда я поздно увидел. там токо когда 12345678910 вводишь ответ 11 не пойму чо так. сейчас стараюсь понять

ramzes [Off] [#] (03.02.2012 / 21:16) Крайне позитивный раздолбай

Monk (03.02.2012/21:11)
да я поздно увидел. там токо когда 12345678910 вводишь ответ 11 не пойму чо так. сейчас стараюсь понятьу тебя участник с номером 0 присутствует?

Monk [Off] [#] (03.02.2012 / 21:16)

бля. longint число 12345678910 не принимает! от этого задача становится безсмисленной ибо учасников менше 10

Monk [Off] [#] (03.02.2012 / 21:17)

ramzes (03.02.2012/21:16)
у тебя участник с номером 0 присутствует?нет

ramzes [Off] [#] (03.02.2012 / 21:18) Крайне позитивный раздолбай

Monk (03.02.2012/21:17)
нетя просто не помню лимит инта, а кроме него только нулевой участник мог сбить расчет

Log!N [Off] [#] (03.02.2012 / 21:20) Последний Дино3@вр

нулевой участник, это тренер

Monk [Off] [#] (03.02.2012 / 21:42)

теперь все пашет:

program GW;
var i, k: integer;
N, l: int64;
begin
write('write N ');
readln(N);
i:=0;
l:=1;
repeat
begin
l:= l*10;
i:= i+1;
end;
until N div l <= 0 ;
k:=0;
l:=1;
while i > 0 do
begin
k:= k+1;
if (k=9) or (k=99) or (k=999) then
l:= l+1;
i:= i-l;
end;
writeln('k = ', k);
end.

Log!N [Off] [#] (03.02.2012 / 21:58) Последний Дино3@вр

Что бы ты делал без пхп кодеров ???