2016年12月30日 星期五

Z2A vb 是否為15、33倍數

M5P01 判斷 S 11的倍數、15的倍數、33的倍數
 變位1   M5P01-1 是否15倍數 , 可以被5整除也可以被3整除
    Function M5P01(ByVal s As String) As String
        Dim c As Char = Strings.Right(s, 1)
        If c<>"0" and c<>="5" then Return "N"  '最後1位非05
        ' 所有位數的總和是3的倍數?
        M5P01 = "Y"
        Dim sum As Integer = 0
        For i = 1 To s.Length
            sum += Val(Mid(s, i, 1))
        Next i
        If sum Mod 3 <> 0 Then Return "N"
    End Function
變位2   M5P01_2 是否33倍數 , 可以被11整除也可以被3整除
    Function M5P01_2(ByVal s As String) As String
        M5P01_2 = "Y"
        Dim odd As Integer = 0, even As Integer = 0
        For i = 1 To s.Length
            If i Mod 2 = 0 Then
                even += Val(Mid(s, i, 1))
            Else
                odd += Val(Mid(s, i, 1))
            End If
        Next
        If Math.Abs(odd - even) Mod 11 <> 0 Then Return "N" '11
        If (odd + even) Mod 3 <> 0 Then Return "N" '3

    End Function

Z2A VB 變化題(找數字)

1/3要測的變化題,預訂這兩天會補充上來
 M2P11 S 字串中的阿拉伯數字
   Function M2P11(ByVal S As String) As String
        M2P11 = ""
        For i = 1 To s.Length
            Dim c As Char = Mid(s, i, 1)
            If c >= "0" And c <= "9" Then M2P11 &= c
        Next
        If M2P11 = "" Then Return "N"
    End Function
變化1 M2P11 S 字串中奇數的阿拉伯數字
   Function M2P11(ByVal S As String) As String
        M2P11 = ""
        For i = 1 To s.Length
            Dim c As Char = Mid(s, i, 1)
            If c >= "0" And c <= "9" And Val(c) Mod 2 = 1 Then M2P11 &= c
        Next
        If M2P11 = "" Then Return "N"

    End Function
變化2 M2P11  S 字串中0~7的阿拉伯數字
   Function M2P11(ByVal S As String) As String
        M2P11 = ""
        For i = 1 To s.Length
            Dim c As Char = Mid(s, i, 1)
            If c >= "0" And c <= "7" Then M2P11 &= c
        Next
        If M2P11 = "" Then Return "N"

    End Function
變化3 M2P11  S 字串中0~9加A~F的數字(十六進位)
   Function M2P11(ByVal S As String) As String
        M2P11 = ""
        For i = 1 To s.Length
            Dim c As Char = Mid(s, i, 1)
            If c >= "0" And c <= "9" Or c >= "A" And c <= "F" Then M2P11 &= c
        Next
        If M2P11 = "" Then Return "N"
    End Function


2016年12月28日 星期三

Z3A_Net 填充&編解碼

範例:僅供參考

二、填充題 10 每題 1
01. 任何會對電腦運作造成負面影響的程式稱為____________,包括: ____________________________________________________
  惡性軟體, 電腦病毒、蠕蟲、特洛伊木馬程式、間諜軟體
02. 阻斷服務攻擊(英文簡稱__________),指的是駭客透過單一電腦發送大量封包,使被攻擊的伺服器因此癱瘓,其他正常使用者無法連上該伺服器。
  DoS
03. 分散式拒絕服務(英文簡稱__________)指的是駭客遠端遙控多台電腦一起發送大量的封包癱瘓目標主機,使受害者難以追查到攻擊來源。
  DDoS
04. 殭屍網路(英文簡稱__________)指的是駭客從遠端下達指令給負責傳送指令的伺服器,伺服器再傳達指令給每一台殭屍電腦,要求它們執行攻擊行為。
  Bot
05. __________是指某些網站為了辨別使用者身分而儲存在用戶端上的資料,可以方便使用者重複瀏覽相同網站時,省略掉許多重複欄位的輸入。
  Cookie
06. 盜連他人無線網路並意圖牟利,根據__________,最高可處五年以下有期徒刑, 併科______________以下罰金。
  電信法,一百五十萬元
07. 入侵公務或政府機關的電腦,依法會根據入侵電腦或其相關設備罪再加重至____________
  二分之一
08. 販賣或出租盜版光碟,根據著作權法第91條,最高可處五年以下____________ 併科__________以下罰金。
  有期徒刑,五百萬元
09. 在網路上刊登援交訊息,根據兒童及少年性交易防制條例,最高可處____________有期徒刑,併科____________以下金。
  五年以下,一百萬元
10. 網路安全策略的要點包括________________________________________________
  威脅預警、存取控制、資料隱密、災難復原

三、編碼、解碼題:(共6題,每題5分)30%

1、自訂5位元編碼如下:
字元
A
B
C
D
E
F
G
H
I
J
K
L
M
N
O
P
十進位
0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
字元
Q
R
S
T
U
V
W
X
Y
Z
,
.
?
2
3
十進位
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31

將明文「ILOVEZ3A?」重新依上表編碼為2進位55bit如下,由左至右每4位元轉為十六進位
0100011010010110111010101001001101011001111110000011101
因最後剩3bit,在最右補0,轉成十六進位如右:4696EA9359F83A

2、同上題給密文:「4696EA9359F83A」,及編碼表同上題,請轉回明文「ILOVEZ3A?

以下4題為範例,幻方需自行寫出,幻方n( 3<= n <= 10 )
第3題、 3x3幻方+6x6幻方填入後以左上直先列出,
  原文:水是眼波橫山是眉峰聚欲問行人去那邊眉眼盈盈處才始送春歸又送君歸去若到江南趕上春千萬和春住。
密文:山是是水橫峰眉眼波若君趕到邊人歸去江南去那行聚春送。如欲問歸又春住上萬盈眉處送春千眼盈才始


水是眼波橫,山是眉峰聚,欲問行人去那邊
眉眼盈盈處,才始送春歸,又送君歸去,
若到江南趕上春,千萬和春住。
3x3幻方+6x6幻方填入後以左上直先列出
6
1
8
24
22
4
2
29
30
山是是水橫峰眉眼波若君趕到邊人
歸去江南去那行聚春送。如欲問歸
又春住上萬盈眉處送春千眼盈才始
7
5
3
21
23
1
3
32
31
2
9
4
28
26
17
18
12
10
25
27
20
19
9
11
8
6
36
34
13
14
5
7
33
35
16
15

第4題、 同上,給密文寫出原文
第5題、6+4階幻方,左上橫式列出
原文:「多情自古傷離別更那堪冷落清秋節今宵酒醒何處楊柳岸曉風殘月此去經年應是良辰好景虛設便縱有千種風情更與何人說」
密文:「岸楊古情此去說景虛與處柳多自年經更情風千月風宵酒落堪種有縱便曉殘何醒那冷設何人好更離辰是清秋傷別應良今節」

以下原文
便
多情自古傷離別更那堪冷落清秋節今宵酒醒
何處楊柳岸曉風殘月此去經年應是良辰好
景虛設便縱有千種風情更與何人說
以下密文:6+4階幻方,左上橫式列出
24
22
4
2
29
30
16
2
3
13
岸楊古情此去說景虛與處柳多自年經便情風
千月風宵酒落堪種有縱更曉殘何醒那冷設何
人好更離辰是清秋傷別應良今節
21
23
1
3
32
31
5
11
10
8
28
26
17
18
12
10
9
7
6
12
25
27
20
19
9
11
4
14
15
1
8
6
36
34
13
14
5
7
33
35
16
15
15
8
1
24
17
6
1
8
16
14
7
5
23
7
5
3
22
20
13
6
4
2
9
4
3
21
19
12
10
9
2
25
18
11


第6題、同上,給密文寫出原文