Сейчас на форуме: Kybyx (+3 невидимых)

 eXeL@B —› Оффтоп —› Задачка для ребенков
<< 1 ... 9 . 10 . 11 . 12 . 13 . 14 . 15 . 16 . 17 . 18 . 19 ... 20 . >>
Посл.ответ Сообщение


Ранг: 199.9 (ветеран), 4thx
Активность: 0.120.02
Статус: Участник

Создано: 23 ноября 2006 03:48
· Личное сообщение · #1

Предлагаю кулхацкерам решить такую простенькую логическую задачку.
Продолжите последовательность:
736 - 1
308 - 3
144 - 0
240 - 1
835 - 2
...
688 - ?




Ранг: 324.3 (мудрец), 221thx
Активность: 0.480.37
Статус: Участник

Создано: 07 мая 2011 17:24
· Личное сообщение · #2

add eax, -1 во всём аналогична dec eax, кроме CF и AF ))

-----
IZ.RU




Ранг: 114.8 (ветеран), 41thx
Активность: 0.10
Статус: Участник

Создано: 07 мая 2011 19:37 · Поправил: _ruzmaz_
· Личное сообщение · #3

SaNX пишет:
Дык и здесь меняеццо

ну если он не взведен был до выполнения, то да, а потом уже нет (если в цикле выполнять)
...по крайней мере у меня




Ранг: 324.3 (мудрец), 221thx
Активность: 0.480.37
Статус: Участник

Создано: 09 мая 2011 22:22
· Личное сообщение · #4

О чём толкуете? Parity Flag - чётность числа взведённых битов младшего байта результата предыдущей команды.

-----
IZ.RU




Ранг: 114.8 (ветеран), 41thx
Активность: 0.10
Статус: Участник

Создано: 09 мая 2011 23:09
· Личное сообщение · #5

DenCoder пишет:
О чём толкуете? Parity Flag - чётность числа взведённых битов младшего байта результата предыдущей команды.

что это за флаг я знаю, просто у меня (в оле и в тестовой проге) приведенный выше кусок кода взводит pf вне зависимости от числа битов в al (в отличие от dec eax)

| Сообщение посчитали полезным: DenCoder


Ранг: 324.3 (мудрец), 221thx
Активность: 0.480.37
Статус: Участник

Создано: 10 мая 2011 11:55 · Поправил: DenCoder
· Личное сообщение · #6

_ruzmaz_, thx, сейчас проверим...

UPD. Да нет, всё ок - флаг когда надо сбрасывается, когда надо взводится.

-----
IZ.RU





Ранг: 324.3 (мудрец), 221thx
Активность: 0.480.37
Статус: Участник

Создано: 26 июля 2011 01:57
· Личное сообщение · #7

Во дела, _ruzmaz_ нашёл ошибку в коде )) Из чего следует, что последовательность команд выше не соответствует полностью команде dec eax. Кто найдёт, тому почётное звание Умелый Багоискатель

-----
IZ.RU




Ранг: 441.3 (мудрец), 297thx
Активность: 0.410.04
Статус: Участник

Создано: 30 июля 2011 15:18
· Личное сообщение · #8

http://www.xakep.ru/post/24370/default.asp

подскажите дураку (то есть мне ) как решить задание №3




Ранг: 756.3 (! !), 113thx
Активность: 0.610.05
Статус: Участник
Student

Создано: 30 июля 2011 20:47
· Личное сообщение · #9

tihiy_grom 8655 думаю... за время около секунды прога находит

-----
z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh




Ранг: 114.8 (ветеран), 41thx
Активность: 0.10
Статус: Участник

Создано: 31 июля 2011 00:03
· Личное сообщение · #10

что за прога?



Ранг: 189.9 (ветеран), 334thx
Активность: 0.30
Статус: Участник

Создано: 31 июля 2011 02:24
· Личное сообщение · #11

_ruzmaz_ пишет:
что за прога?

Code:
  1. const 
  2. MaxN = 500 ;
  3. N=500;
  4.  
  5. type 
  6. index = 1..MaxN ;
  7.  
  8. var 
  9. A: array [index] of integer ;
  10. m: integer ;
  11. var p: index ;
  12.  
  13. function Max(x, y: integer): integer ;
  14. begin if x > y then Max := x else Max := y end { Max } ;
  15.  
  16. var r, p: integer ; t: 0..999 ; v, w: integer ; {считывем данные из файла(inp)}
  17. begin 
  18. for p := 0 to N do A[p] := 0 ;
  19. for r := 1 to N do begin 
  20. := 0 ;
  21. for p := 1 to r do begin 
  22. read(inp, t) ;
  23. := A[p] ;
  24. A[p] := t + Max(v, w) ;
  25. := w 
  26. end;
  27. readln(inp) 
  28. end;
  29. end;
  30.  
  31. begin {считаем максимальную сумму} 
  32. := 0 ;
  33. for p := 1 to N do 
  34. := Max(m, A[p]) ;
  35. end ;





Ранг: 756.3 (! !), 113thx
Активность: 0.610.05
Статус: Участник
Student

Создано: 31 июля 2011 13:47 · Поправил: Isaev
· Личное сообщение · #12

NikolayD забавно, даже переменные похоже обозвали )))
Code:
  1. Function Max(X,Y:LongInt):LongInt;
  2. Begin
  3.   If X>Y Then Max:=X
  4.          Else Max:=Y;
  5. End;
  6.  
  7. Procedure TForm1.Button1Click(Sender:TObject);
  8. Const
  9.   MaxN=121;
  10. Var
  11.   A:Array[1..MaxN,1..MaxN] Of LongInt;
  12.   R:Array[1..MaxN,0..MaxN] Of LongInt;
  13.   N,I,J:LongInt;
  14.   F:TextFile;
  15.   S:String;
  16. Begin
  17. {$I-}
  18.   AssignFile(F,'triangle1.txt');
  19.   Reset(F);
  20. {$I+}
  21.   If IOResult<>0 Then Exit;
  22.  
  23.   Button1.Enabled:=False;
  24.   N:=MaxN;
  25.  
  26.   For I:=1 To N Do
  27.     Begin
  28.       S:='';
  29.       For J:=1 To I Do
  30.         Begin
  31.           Read(F,A[I,J]);
  32.           S:=S+IntToStr(A[I,J]);
  33.           If J<>I Then S:=S+' ';
  34.         End;
  35.       Memo1.Lines.Append(S);
  36.     End;
  37.   CloseFile(F);
  38.   Memo1.Lines.Append('');
  39.  
  40.   R[1,1]:=A[1,1];
  41.  
  42.   For I:=2 To N Do
  43.     For J:=1 To I Do
  44.       R[I,J]:=Max(A[I,J]+R[I-1,J],A[I,J]+R[I-1,J-1]);
  45.  
  46.   For I:=1 To N Do
  47.     Begin
  48.       S:='';
  49.       For J:=1 To I Do
  50.         Begin
  51.           S:=S+IntToStr(R[I,J]);
  52.           If J<>N Then S:=S+' ';
  53.         End;
  54.       Memo1.Lines.Append(S);
  55.     End;
  56.   Memo1.Lines.Append('');
  57.  
  58.   J:=-MaxLongInt;
  59.   For I:=1 To N Do
  60.     If R[N,I]>J Then J:=R[N,I];
  61.  
  62.   Edit1.Text:=IntToStr(J);
  63.   Button1.Enabled:=True;
  64. End;


-----
z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh





Ранг: 328.7 (мудрец), 73thx
Активность: 0.170.01
Статус: Участник

Создано: 01 августа 2011 01:12
· Личное сообщение · #13

может не совсем в тему - но почти детская задача:
Точки пересечения смежных трисектрис углов произвольного треугольника являются вершинами равностороннего треугольника.(Трисектриса угла — луч, делящий угол на три равные части.)
Кто-нить знает доказательство?




Ранг: 2014.5 (!!!!), 1278thx
Активность: 1.340.25
Статус: Модератор
retired

Создано: 01 августа 2011 10:11
· Личное сообщение · #14

луч, делящий угол на 3 части-взорвало мозг
Гугл теорема Морлея?




Ранг: 756.3 (! !), 113thx
Активность: 0.610.05
Статус: Участник
Student

Создано: 01 августа 2011 10:16
· Личное сообщение · #15

r99 доказательство Теоремы Морлея

-----
z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh





Ранг: 328.7 (мудрец), 73thx
Активность: 0.170.01
Статус: Участник

Создано: 01 августа 2011 10:59
· Личное сообщение · #16

задачу эту давно видел - у Гарднера вроде
про Морлея впервые слышу
спасибо



Ранг: 62.8 (постоянный), 11thx
Активность: 0.060
Статус: Участник

Создано: 04 августа 2011 17:53
· Личное сообщение · #17

Трисектриса угла — луч, образующий вместе со стороной или другой трисектрисой угол с мерой в 3 раза меньше исходного




Ранг: 199.9 (ветеран), 4thx
Активность: 0.120.02
Статус: Участник

Создано: 07 октября 2011 22:25
· Личное сообщение · #18

5 копеек = √25 копеек = √1/4 рубля = 1/2 рубля = 50 копеек





Ранг: 164.6 (ветеран), 65thx
Активность: 0.120
Статус: Участник
Волшебник

Создано: 07 октября 2011 23:21 · Поправил: neomant
· Личное сообщение · #19

5 = √25 = √(1/4 * 100) = 1/2 * 10 = 5

-----
Следуй за белым кроликом




Ранг: 315.1 (мудрец), 631thx
Активность: 0.30.33
Статус: Модератор
CrackLab

Создано: 08 октября 2011 21:23
· Личное сообщение · #20

http://rghost.ru/24739891.view




Ранг: 164.6 (ветеран), 65thx
Активность: 0.120
Статус: Участник
Волшебник

Создано: 08 октября 2011 22:30
· Личное сообщение · #21

1.22 (м^3)

-----
Следуй за белым кроликом


| Сообщение посчитали полезным: SReg

Ранг: 441.3 (мудрец), 297thx
Активность: 0.410.04
Статус: Участник

Создано: 28 ноября 2011 03:48 · Поправил: tihiy_grom
· Личное сообщение · #22

на листе бумаги нарисованы точки.
нужно пересечь их все четырьми прямыми линиями, не отрывая карандаша от бумаги.

Code:
  1. О    О    О
  2.  
  3. О    О    О
  4.  
  5. О    О    О




Ранг: 281.8 (наставник), 272thx
Активность: 0.250.01
Статус: Участник
Destroyer of protectors

Создано: 28 ноября 2011 05:48 · Поправил: MasterSoft
· Личное сообщение · #23

тут было решение



Ранг: 441.3 (мудрец), 297thx
Активность: 0.410.04
Статус: Участник

Создано: 28 ноября 2011 16:49 · Поправил: tihiy_grom
· Личное сообщение · #24

MasterSoft
читер

ещё одна задачка (не путать с задачей из шапки)

438 - 2
318 - 2
188 - 4
807 - 3
630 - 2
321 - 1
...
683 - ?



Ранг: 114.8 (ветеран), 41thx
Активность: 0.10
Статус: Участник

Создано: 30 ноября 2011 01:08
· Личное сообщение · #25

683 - 4
число справа = кол-во букв "с" в числе слева, записанном прописью на русском



Ранг: 441.3 (мудрец), 297thx
Активность: 0.410.04
Статус: Участник

Создано: 30 ноября 2011 01:28
· Личное сообщение · #26

маладца с тебя следующая задача



Ранг: 114.8 (ветеран), 41thx
Активность: 0.10
Статус: Участник

Создано: 30 ноября 2011 18:21
· Личное сообщение · #27

это не скоро, на ум одни бояны приходят




Ранг: 158.5 (ветеран), 219thx
Активность: 0.120.01
Статус: Участник

Создано: 03 июля 2012 12:29
· Личное сообщение · #28

Не знаю, было или нет (поиск молчит как партизан), но вот вам задачка:

Есть башня высотой 100 м. на высоте 50 м. есть балкончик. Вы находитесь на самом верху. У вас есть веревка, длиной 75 м. и нож. Как спуститься так, чтобы не разбиться и даже не ушибиться?

-----
One death is a tragedy, one million is a statistic.




Ранг: 0.0 (гость)
Активность: 0.250
Статус: Участник

Создано: 03 июля 2012 17:33
· Личное сообщение · #29

ZaZa
Раз
Два




Ранг: 158.5 (ветеран), 219thx
Активность: 0.120.01
Статус: Участник

Создано: 16 июля 2012 10:39
· Личное сообщение · #30

F_a_u_s_t

Хитрый, да?

-----
One death is a tragedy, one million is a statistic.





Ранг: 469.0 (мудрец), 100thx
Активность: 0.250
Статус: Участник
[www.AHTeam.org]

Создано: 11 октября 2012 19:44
· Личное сообщение · #31



-----
-=истина где-то рядом=-



<< 1 ... 9 . 10 . 11 . 12 . 13 . 14 . 15 . 16 . 17 . 18 . 19 ... 20 . >>
 eXeL@B —› Оффтоп —› Задачка для ребенков

У вас должно быть 20 пунктов ранга, чтобы оставлять сообщения в этом подфоруме, но у вас только 0

   Для печати Для печати