יומן המורה

׳›׳ ׳¨׳�׳” ׳©׳ ׳’׳�׳¨׳• ׳”׳‘׳¢׳™׳•׳× ׳�׳� ׳™׳© ׳�׳ ׳• ׳–׳�׳� ׳�׳©׳—׳§ ׳‘-"׳‘׳•׳� ׳₪׳’׳™׳¢׳”".
׳”׳—׳•׳§׳™׳� ׳�׳�׳™ ׳©׳‘׳�׳§׳¨׳” ׳�׳™׳ ׳• ׳�׳›׳™׳¨: ׳©׳—׳§׳� ׳�’ ׳‘׳•׳—׳¨ ׳�׳¡׳₪׳¨ ׳‘׳� 4 ׳¡׳₪׳¨׳•׳× ׳©׳•׳ ׳•׳× (׳�׳�׳©׳� 1528), ׳•׳©׳—׳§׳� ׳‘’ ׳�׳ ׳¡׳” ׳�׳ ׳—׳©.
׳”׳×׳©׳•׳‘׳” ׳¢׳� ׳›׳� ׳ ׳™׳—׳•׳© ׳©׳� ׳‘’ ׳¦׳¨׳™׳›׳” ׳�׳”׳™׳•׳× ׳�׳¡׳₪׳¨ ׳”"׳‘׳•׳�׳™׳�" (׳›׳�׳•׳�׳¨- ׳›׳�׳” ׳¡׳₪׳¨׳•׳× ׳�׳×׳•׳� ׳”-4 ׳©׳‘׳ ׳™׳—׳•׳© ׳ ׳�׳¦׳�׳•׳× ׳‘׳�׳§׳•׳� ׳”׳ ׳›׳•׳�),
׳•׳�׳¡׳₪׳¨ ׳”"׳₪׳’׳™׳¢׳•׳×" (׳›׳�׳•׳�׳¨- ׳›׳�׳” ׳¡׳₪׳¨׳•׳× ׳�׳×׳•׳� ׳”-4 ׳�׳•׳₪׳™׳¢׳•׳× ׳‘׳�׳¡׳₪׳¨ ׳©׳‘׳—׳¨ ׳�’ ׳�׳� ׳�׳� ׳‘׳�׳§׳•׳� ׳”׳ ׳›׳•׳�).
׳�׳�׳©׳� ׳�׳� ׳�’ ׳‘׳—׳¨ 0123 ׳•-׳‘’ ׳�׳ ׳—׳© ׳©׳”׳�׳¡׳₪׳¨ ׳”׳•׳� 1283, ׳�׳–׳™ ׳™׳© ׳�׳• "׳‘׳•׳�" ׳�׳—׳“ (׳”׳¡׳₪׳¨׳” 3) ׳•׳©׳×׳™ "׳₪׳’׳™׳¢׳•׳×" (׳”׳¡׳₪׳¨׳•׳× 1 ׳•-2).
׳›׳¢׳× ׳‘’ ׳�׳¦׳™׳¢ ׳ ׳™׳—׳•׳© ׳—׳“׳© ׳¢׳� ׳¡׳�׳� ׳”׳�׳™׳“׳¢ ׳”׳—׳�׳§׳™ ׳©׳‘׳™׳“׳•, ׳•׳—׳•׳–׳¨ ׳—׳�׳™׳�׳” ׳¢׳“ ׳©׳”׳•׳� ׳�׳ ׳—׳© ׳ ׳›׳•׳ ׳” ׳�׳× ׳”׳�׳¡׳₪׳¨.

׳�׳ ׳—׳ ׳• ׳ ׳‘׳—׳¨ ׳�׳¡׳₪׳¨ ׳•׳”׳�׳—׳©׳‘ ׳™׳ ׳—׳© ׳•׳™׳’׳�׳”,
׳•׳�׳©׳� ׳›׳� ׳ ׳›׳×׳•׳‘ ׳₪׳¨׳•׳¦׳“׳•׳¨׳” ׳©׳×׳™׳¦׳•׳¨ ׳˜׳‘׳�׳” ׳¢׳� 10*9*8*7=5040 ׳”׳¦׳™׳¨׳•׳₪׳™׳� ׳”׳—׳•׳§׳™׳™׳�,
׳‘׳˜׳‘׳�׳” ׳™׳”׳™׳” ׳©׳“׳” ׳©׳™׳¦׳™׳™׳� ׳�׳� ׳”׳�׳¡׳₪׳¨ ׳�׳₪׳©׳¨׳™ ׳�׳�׳•׳¨ ׳”׳�׳™׳“׳¢ ׳©׳§׳™׳‘׳�׳ ׳• ׳¢׳“ ׳›׳” (׳‘׳”׳×׳—׳�׳” ׳�׳›׳� ׳”׳�׳¡׳₪׳¨׳™׳� ׳�׳™׳ ׳“׳™׳§׳¦׳™׳” 1 ׳•׳‘׳›׳� ׳�׳™׳˜׳¨׳¦׳™׳” ׳”׳�׳—׳©׳‘ ׳™׳�׳₪׳¡ ׳�׳•׳×׳” ׳¢׳‘׳•׳¨ ׳”׳�׳� ׳¨׳�׳•׳•׳ ׳˜׳™׳™׳�),
׳•׳”׳�׳—׳©׳‘ ׳™׳‘׳—׳¨ ׳¨׳©׳•׳�׳” ׳�׳—׳× ׳‘׳�׳•׳₪׳� ׳�׳§׳¨׳�׳™ ׳•׳™׳¦׳™׳’ ׳�׳•׳×׳” ׳›׳ ׳™׳—׳•׳©:

Create Proc SP_BulPgia_Begin As

If (Select Count(*) From sys.tables Where name=’T_BulPgia’)=1  Table T_BulPgia;

Create Table T_BulPgia(A Char(1),B Char(1),C Char(1),D Char(1),YesNo Bit);

Create Unique Clustered Index T_BulPgia_Idx On T_BulPgia(A,B,C,D);

With Nm As

(Select 0 N

Union All

Select    N+1

From    Nm

Where    N<9)

Insert Into T_BulPgia

Select    Cast(N1.N As Char) A,

        Cast(N2.N As Char) B,

        Cast(N3.N As Char) C,

        Cast(N4.N As Char) D,

        1 YesNo

From    Nm N1

Inner Join Nm N2

        On N2.N<>N1.N

Inner Join Nm N3

        On N3.N<>N1.N

        And N3.N<>N2.N

Inner Join Nm N4

        On N4.N<>N1.N

        And N4.N<>N2.N

        And N4.N<>N3.N;

Select    Top 1 ’My guess: ’+A+B+C+D

From    T_BulPgia

Order By NewID();

׳›׳¢׳× ׳ ׳›׳×׳•׳‘ ׳₪׳¨׳•׳¦׳“׳•׳¨׳” ׳ ׳•׳¡׳₪׳× ׳©׳×׳§׳‘׳� ׳�׳× ׳”׳ ׳™׳—׳•׳© ׳”׳�׳—׳¨׳•׳� ׳©׳� ׳”׳�׳—׳©׳‘, ׳�׳× ׳�׳¡׳₪׳¨ ׳”׳‘׳•׳�׳™׳� ׳•׳�׳× ׳�׳¡׳₪׳¨ ׳”׳₪׳’׳™׳¢׳•׳× (׳©׳�׳•׳©׳” ׳₪׳¨׳�׳˜׳¨׳™׳� ׳‘׳¡׳”"׳›),

׳”׳�׳—׳©׳‘ ׳™׳�׳₪׳¡ ׳�׳× ׳”׳�׳™׳ ׳“׳™׳§׳¦׳™׳•׳× ׳©׳� ׳›׳� ׳”׳¨׳©׳•׳�׳•׳× ׳©׳”׳”׳©׳•׳•׳�׳” ׳©׳�׳”׳� ׳�׳ ׳™׳—׳•׳© ׳”׳�׳—׳¨׳•׳� ׳�׳™׳ ׳” ׳�׳—׳–׳™׳¨׳” ׳�׳× ׳�׳¡׳₪׳¨ ׳”׳‘׳•׳�׳™׳� ׳•׳”׳₪׳’׳™׳¢׳•׳× ׳”׳ ׳›׳•׳�,

׳•׳�׳×׳•׳� ׳”׳¨׳©׳•׳�׳•׳× ׳©׳”׳�׳™׳ ׳“׳™׳§׳¦׳™׳” ׳©׳�׳”׳� ׳”׳™׳� ׳¢׳“׳™׳™׳� 1 ׳”׳�׳—׳©׳‘ ׳™׳©׳�׳•׳£ ׳�׳§׳¨׳�׳™׳× ׳ ׳™׳—׳•׳© ׳ ׳•׳¡׳£.

׳×׳”׳�׳™׳� ׳–׳” ׳™׳—׳–׳•׳•׳¨ ׳¢׳� ׳¢׳¦׳�׳• ׳¢׳“ ׳©׳×׳™׳•׳•׳×׳¨ ׳�׳™׳ ׳“׳™׳§׳¦׳™׳” 1 ׳¨׳§ ׳�׳�׳¡׳₪׳¨ ׳�׳—׳“ ׳•׳–׳• ׳”׳×׳©׳•׳‘׳” ׳”׳ ׳›׳•׳ ׳”:

Create Proc SP_BulPgia_Guess(@Guess Char(4), @Bul Int, @Pgia Int) As

With T As

(Select    *,

        Case When SUBSTRING(@Guess,1,1)=A Then 1 Else 0 End +

        Case When SUBSTRING(@Guess,2,1)=B Then 1 Else 0 End +

        Case When SUBSTRING(@Guess,3,1)=C Then 1 Else 0 End +

        Case When SUBSTRING(@Guess,4,1)=D Then 1 Else 0 End Bul,

        Case When SUBSTRING(@Guess,2,3) Like ’%’+A+’%’ Then 1 Else 0 End +

        Case When SUBSTRING(@Guess,1,1)+SUBSTRING(@Guess,3,2) Like ’%’+B+’%’ Then 1 Else 0 End +

        Case When SUBSTRING(@Guess,1,2)+SUBSTRING(@Guess,4,1) Like ’%’+C+’%’ Then 1 Else 0 End +

        Case When SUBSTRING(@Guess,1,3) Like ’%’+D+’%’ Then 1 Else 0 End Pgia

From    T_BulPgia

Where    YesNo=1)

Update    T

Set        YesNo=0

Where    Not (Bul=@Bul And Pgia=@Pgia);

Select    Top 1 Case (Select COUNT(*) From T_BulPgia Where YesNo=1) When 1 Then ’The answer is: ’ Else ’My guess: ’ End +A+B+C+D

From    T_BulPgia

Where    YesNo=1

Order By NewID();

׳ ׳×׳—׳™׳� ׳�׳©׳—׳§: ׳‘׳—׳¨׳×׳™ ׳�׳× ׳”׳�׳¡׳₪׳¨ 1528 (׳�׳� ׳�׳’׳�׳•׳× ׳�׳�׳—׳©׳‘- ׳”׳•׳� ׳¦׳¨׳™׳� ׳�׳�׳¦׳•׳� ׳�׳‘׳“!) ׳•׳”׳₪׳¢׳�׳×׳™ ׳�׳× ׳”׳₪׳¨׳•׳¦׳“׳•׳¨׳” SP_BulPgia_Begin.

׳”׳ ׳™׳—׳•׳© ׳©׳�׳• 6342 ׳©׳–׳” 0 ׳‘׳•׳�׳™׳� ׳•-1 ׳₪׳’׳™׳¢׳•׳× ׳•׳�׳›׳� ׳�׳ ׳™ ׳�׳₪׳¢׳™׳� ׳�׳× ׳”׳₪׳¨׳•׳¦׳“׳•׳¨׳” SP_BulPgia_Guess ׳¢׳� ׳”׳₪׳¨׳�׳˜׳¨׳™׳� ’6342’,0,1.

׳”׳ ׳™׳—׳•׳© ׳©׳�׳• ׳¢׳›׳©׳™׳• 2015 ׳©׳–׳” 0 ׳‘׳•׳�׳™׳� ׳•-3 ׳₪׳’׳™׳¢׳•׳×,

׳”׳ ׳™׳—׳•׳© ׳”׳‘׳� ׳©׳�׳• 7201 ׳©׳–׳” 0 ׳‘׳•׳�׳™׳� ׳•-2 ׳₪׳’׳™׳¢׳•׳×,

׳”׳ ׳™׳—׳•׳© ׳”׳‘׳� ׳©׳�׳• 1530 ׳©׳–׳” 2 ׳‘׳•׳�׳™׳� ׳•-0 ׳₪׳’׳™׳¢׳•׳×,

׳”׳ ׳™׳—׳•׳© ׳”׳‘׳� (׳©׳‘׳�׳§׳¨׳” ׳”׳•׳� ׳’׳� ׳”׳×׳©׳•׳‘׳” ׳”׳ ׳›׳•׳ ׳”) ׳”׳•׳� 1528 ׳•׳–׳” 4 ׳‘׳•׳�׳™׳� ׳•-0 ׳₪׳’׳™׳¢׳•׳×,

׳•׳¨׳§ ׳›׳¢׳× ׳”׳•׳� ׳�׳›׳¨׳™׳– ׳©-1528 ׳–׳• ׳”׳×׳©׳•׳‘׳” ׳”׳ ׳›׳•׳ ׳”:

SP_BulPgia_Begin;            My guess: 6342

SP_BulPgia_Guess ’6342’,0,1;My guess: 2015

SP_BulPgia_Guess ’2015’,0,3;My guess: 7201

SP_BulPgia_Guess ’7201’,0,2;My guess: 1530

SP_BulPgia_Guess ’1530’,2,0;My guess: 1528

SP_BulPgia_Guess ’1528’,4,0;The answer is: 1528