Разбор интересных задач<< 1 ... 9 10 11 12 13 ... 76 >> 20.01.2011 / 20:37 | | XakepPRO  Пользователь
| Пробежаться циклом, и посмотреть, сколько раз встречается? Спасибо большое.
|
20.01.2011 / 20:40 | | Freddy  Пользователь
Сейчас: Offline
Имя: Игорь Откуда: Воронеж Регистрация: 30.01.2010
| XakepPRO, И цикл я бы записал по-другому, поскольку все чётные числа (кроме 2) не являются простыми, то их можно заведомо отбросить: for(int i=1000001;i<2000000;i+=2)
|
20.01.2011 / 20:41 | | XakepPRO  Пользователь
| Пятая, так сказать, задача.
Числом-палиндромом называется число, равное своему зеркальному отражению, например, 676, или 9449.
Рассмотрим смешанную систему счисления с основанием — последовательностью, порождаемой произведениями первых простых чисел, то есть { 2, 2*3, 2*3*5, ... }. Младший разряд числа в такой системе счисления должен быть меньше двух, второй — меньше трех, третий — меньше пяти и т. д. Например, число 1221 в данной системе счисления равно числу 1*2*3*5+2*2*3+2*2+1=47 в десятичной системе.
Найдите максимальное число-палиндром в описанной выше смешанной системе счисления, не превышающее числа 2000000000 (запись в десятичной системе счисления).
Ответ запишите в виде целого числа в десятичной системе счисления. Опишите, каким образом был получен ответ.
Срок: до 24(лучше до 23 января). Монеты: 250.
|
20.01.2011 / 22:40 | | XakepPRO  Пользователь
| Тьфу, в массиве ты сразу прибавляешь число повторений.
Насчёт простых чисел. Это не мой алгоритм (был исходник на компе, я взял). Когда я реализовывал, удавалось ускорить программу в 4 раза.
|
20.01.2011 / 23:12 | | LPzhelud  Пользователь
Сейчас: Offline
Имя: Коля Откуда: Москва Регистрация: 02.06.2010
| XakepPRO, тебе не кажется, что тебя надо забанить за нечестное участие?
__________________
 Эль Презеденте |
20.01.2011 / 23:22 | | XakepPRO  Пользователь
| Надо, но 3 я честно решил, а 2 задачи вот здеся Фредди, за что ему спасибо. Это халявная интернет олимпиада, и роли она не играет большой. Я взял оттуда задачи, на рассмотрение. Введи любую задачу в поиске, и увидишь, что на форумах люди ищут ответы) Я долгое время не спал, и очень плохо чувствую, поэтому, мне можно.  А результаты я всё равно отправлять не буду (хотя очень хочется). Изменено XakepPRO (20.01 / 23:24) (всего 1 раз) |
20.01.2011 / 23:29 | | LPzhelud  Пользователь
Сейчас: Offline
Имя: Коля Откуда: Москва Регистрация: 02.06.2010
| XakepPRO, А, ну если халявная, решайтее)
__________________
 Эль Презеденте |
21.01.2011 / 16:19 | | aleksey  Пользователь
Сейчас: Offline
Имя: Алексей Откуда: Saint-Petersburg Регистрация: 22.01.2010
| Как обещал выкладываю своё решение задачи Сумма на Pascal: program summa;
var i,k,s,n,j,l:integer;
begin
write('Ââåäèòå ñóììó: ');
readln(s);
if(s>0)and(s<=100000) then begin
l:=1-s;
for i:=s downto l do begin
for k:=i downto l do begin
n:=0;
for j:=k to i do n:=n+j;
if n=s then write('(',k,',',i,')');
end;
end;
end
else if(s<0)and(s>=-100000) then begin
l:=-s-1;
for i:=s to l do begin
for k:=i to l do begin
n:=0;
for j:=s to k do n:=n+j;
if n=s then write('(',s,',',k,')')
else if n<s then break;
end;
end;
end
else if s=0 then begin
for i:=0 to 10000 do begin
if i>0 then write('(',-i,',',i,')')
else write('(0,0)');
end;
end;
writeln('');
end.
|
27.01.2011 / 14:50 | | Naik  Пользователь
Сейчас: Offline
Имя: %name% Регистрация: 14.03.2010
| задача есть 11 монет и аптекарьские весы(две чашки). Одна монета немного тяжелей. Надо за три взвешивания найти бракованую монету.
даю 50 монет
|
<< 1 ... 9 10 11 12 13 ... 76 >>  Всего сообщений: 751 Фильтровать сообщения
Поиск по теме
Файлы топика (34)
|