Используя графические элементы из коллекции Shapes, нарисуйте красивое животное - VB

Узнай цену своей работы

Формулировка задачи:

1. Используя графические элементы из коллекции Shapes (окружности, прямоугольники, звёзды, куб, отрезки, стрелки, и т.д.) нарисуйте красивое животное. (использовать это кодом!

Решение задачи: «Используя графические элементы из коллекции Shapes, нарисуйте красивое животное»

textual
Листинг программы
Private Sub Command1_Click()
Form1.ScaleMode = 3
Form1.Line (18, 80)-(18, 84)
Form1.Line (18, 92)-(18, 93)
Form1.Line (19, 79)-(19, 81)
Form1.Line (20, 78)-(20, 81)
Form1.Line (21, 54)-(21, 55)
Form1.Line (21, 77)-(21, 81)
Form1.Line (21, 190)-(21, 191)
Form1.Line (21, 194)-(21, 195)
Form1.Line (22, 52)-(22, 57)
Form1.Line (22, 76)-(22, 86)
Form1.Line (22, 94)-(22, 95)
Form1.Line (22, 119)-(22, 123)
Form1.Line (23, 52)-(23, 63)
Form1.Line (23, 75)-(23, 89)
Form1.Line (23, 92)-(23, 94)
Form1.Line (23, 117)-(23, 118)
Form1.Line (23, 128)-(23, 130)
Form1.Line (23, 187)-(23, 188)
Form1.Line (24, 52)-(24, 53)
Form1.Line (24, 54)-(24, 64)
Form1.Line (24, 75)-(24, 92)
Form1.Line (24, 191)-(24, 192)
Form1.Line (25, 52)-(25, 53)
Form1.Line (25, 56)-(25, 64)
Form1.Line (25, 68)-(25, 92)
Form1.Line (25, 114)-(25, 115)
Form1.Line (25, 135)-(25, 136)
Form1.Line (25, 184)-(25, 185)
Form1.Line (26, 58)-(26, 65)
Form1.Line (26, 67)-(26, 98)
Form1.Line (26, 113)-(26, 114)
Form1.Line (26, 182)-(26, 183)
Form1.Line (26, 212)-(26, 213)
Form1.Line (27, 59)-(27, 99)
Form1.Line (27, 111)-(27, 113)
Form1.Line (28, 60)-(28, 100)
Form1.Line (29, 60)-(29, 101)
Form1.Line (29, 110)-(29, 111)
Form1.Line (29, 132)-(29, 133)
Form1.Line (30, 60)-(30, 102)
Form1.Line (30, 131)-(30, 132)
Form1.Line (30, 176)-(30, 177)
Form1.Line (30, 212)-(30, 213)
Form1.Line (31, 60)-(31, 100)
Form1.Line (31, 129)-(31, 130)
Form1.Line (31, 175)-(31, 176)
Form1.Line (32, 60)-(32, 95)
Form1.Line (32, 106)-(32, 107)
Form1.Line (32, 127)-(32, 128)
Form1.Line (32, 174)-(32, 175)
Form1.Line (32, 200)-(32, 202)
Form1.Line (33, 60)-(33, 90)
Form1.Line (33, 105)-(33, 106)
Form1.Line (33, 126)-(33, 127)
Form1.Line (34, 59)-(34, 83)
Form1.Line (34, 84)-(34, 87)
Form1.Line (34, 124)-(34, 125)
Form1.Line (34, 171)-(34, 172)
Form1.Line (34, 183)-(34, 184)
Form1.Line (34, 196)-(34, 197)
Form1.Line (35, 58)-(35, 86)
Form1.Line (35, 102)-(35, 103)
Form1.Line (35, 122)-(35, 123)
Form1.Line (35, 180)-(35, 181)
Form1.Line (36, 56)-(36, 85)
Form1.Line (36, 101)-(36, 102)
Form1.Line (36, 120)-(36, 121)
Form1.Line (36, 168)-(36, 169)
Form1.Line (36, 179)-(36, 180)
Form1.Line (37, 55)-(37, 74)
Form1.Line (37, 76)-(37, 84)
Form1.Line (37, 118)-(37, 119)
Form1.Line (37, 177)-(37, 178)
Form1.Line (38, 55)-(38, 69)
Form1.Line (38, 81)-(38, 83)
Form1.Line (38, 98)-(38, 99)
Form1.Line (38, 116)-(38, 117)
Form1.Line (39, 55)-(39, 66)
Form1.Line (39, 95)-(39, 96)
Form1.Line (39, 99)-(39, 100)
Form1.Line (39, 113)-(39, 114)
Form1.Line (40, 55)-(40, 65)
Form1.Line (40, 68)-(40, 69)
Form1.Line (40, 75)-(40, 76)
Form1.Line (40, 93)-(40, 94)
Form1.Line (40, 100)-(40, 101)
Form1.Line (40, 110)-(40, 112)
Form1.Line (40, 162)-(40, 163)
Form1.Line (41, 52)-(41, 53)
Form1.Line (41, 54)-(41, 65)
Form1.Line (41, 66)-(41, 76)
Form1.Line (41, 98)-(41, 99)
Form1.Line (41, 107)-(41, 114)
Form1.Line (41, 172)-(41, 173)
Form1.Line (42, 54)-(42, 73)
Form1.Line (42, 99)-(42, 100)
Form1.Line (42, 104)-(42, 116)
Form1.Line (42, 165)-(42, 168)
Form1.Line (43, 49)-(43, 50)
Form1.Line (43, 51)-(43, 71)
Form1.Line (43, 80)-(43, 81)
Form1.Line (43, 99)-(43, 100)
Form1.Line (43, 101)-(43, 118)
Form1.Line (43, 162)-(43, 164)
Form1.Line (43, 165)-(43, 168)
Form1.Line (44, 50)-(44, 70)
Form1.Line (44, 82)-(44, 83)
Form1.Line (44, 99)-(44, 119)
Form1.Line (44, 164)-(44, 168)
Form1.Line (45, 47)-(45, 48)
Form1.Line (45, 49)-(45, 74)
Form1.Line (45, 77)-(45, 78)
Form1.Line (45, 84)-(45, 85)
Form1.Line (45, 97)-(45, 120)
Form1.Line (45, 155)-(45, 156)
Form1.Line (45, 162)-(45, 163)
Form1.Line (45, 165)-(45, 166)
Form1.Line (46, 49)-(46, 61)
Form1.Line (46, 62)-(46, 74)
Form1.Line (46, 76)-(46, 77)
Form1.Line (46, 95)-(46, 120)
Form1.Line (46, 154)-(46, 155)
Form1.Line (46, 161)-(46, 162)
Form1.Line (47, 48)-(47, 73)
Form1.Line (47, 75)-(47, 76)
Form1.Line (47, 78)-(47, 79)
Form1.Line (47, 87)-(47, 88)
Form1.Line (47, 94)-(47, 121)
Form1.Line (47, 153)-(47, 156)
Form1.Line (47, 163)-(47, 165)
Form1.Line (48, 41)-(48, 43)
Form1.Line (48, 47)-(48, 67)
Form1.Line (48, 68)-(48, 69)
Form1.Line (48, 71)-(48, 72)
Form1.Line (48, 74)-(48, 75)
Form1.Line (48, 89)-(48, 90)
Form1.Line (48, 98)-(48, 121)
Form1.Line (48, 152)-(48, 156)
Form1.Line (49, 41)-(49, 45)
Form1.Line (49, 46)-(49, 66)
Form1.Line (49, 101)-(49, 121)
Form1.Line (49, 150)-(49, 151)
Form1.Line (49, 152)-(49, 156)
Form1.Line (50, 41)-(50, 65)
Form1.Line (50, 104)-(50, 121)
Form1.Line (50, 149)-(50, 150)
Form1.Line (51, 41)-(51, 65)
Form1.Line (51, 76)-(51, 77)
Form1.Line (51, 79)-(51, 80)
Form1.Line (51, 105)-(51, 121)
Form1.Line (51, 151)-(51, 152)
Form1.Line (51, 153)-(51, 155)
Form1.Line (52, 41)-(52, 65)
Form1.Line (52, 106)-(52, 121)
Form1.Line (52, 150)-(52, 151)
Form1.Line (53, 43)-(53, 47)
Form1.Line (53, 48)-(53, 66)
Form1.Line (53, 78)-(53, 79)
Form1.Line (53, 106)-(53, 121)
Form1.Line (54, 48)-(54, 65)
Form1.Line (54, 66)-(54, 67)
Form1.Line (54, 107)-(54, 122)
Form1.Line (54, 158)-(54, 159)
Form1.Line (55, 48)-(55, 66)
Form1.Line (55, 69)-(55, 70)
Form1.Line (55, 106)-(55, 122)
Form1.Line (56, 48)-(56, 66)
Form1.Line (56, 104)-(56, 122)
Form1.Line (57, 47)-(57, 64)
Form1.Line (57, 67)-(57, 68)
Form1.Line (57, 69)-(57, 70)
Form1.Line (57, 102)-(57, 123)
Form1.Line (58, 47)-(58, 64)
Form1.Line (58, 101)-(58, 123)
Form1.Line (59, 47)-(59, 64)
Form1.Line (59, 70)-(59, 71)
Form1.Line (59, 99)-(59, 124)
Form1.Line (60, 47)-(60, 63)
Form1.Line (60, 64)-(60, 65)
Form1.Line (60, 70)-(60, 72)
Form1.Line (60, 98)-(60, 124)
Form1.Line (61, 47)-(61, 66)
Form1.Line (61, 96)-(61, 124)
Form1.Line (61, 130)-(61, 131)
Form1.Line (61, 148)-(61, 149)
Form1.Line (61, 152)-(61, 153)
Form1.Line (62, 47)-(62, 66)
Form1.Line (62, 69)-(62, 70)
Form1.Line (62, 80)-(62, 81)
Form1.Line (62, 90)-(62, 91)
Form1.Line (62, 94)-(62, 125)
Form1.Line (62, 129)-(62, 132)
Form1.Line (62, 145)-(62, 146)
Form1.Line (62, 147)-(62, 150)
Form1.Line (63, 46)-(63, 69)
Form1.Line (63, 71)-(63, 72)
Form1.Line (63, 90)-(63, 123)
Form1.Line (63, 125)-(63, 127)
Form1.Line (63, 128)-(63, 132)
Form1.Line (63, 147)-(63, 150)
Form1.Line (64, 45)-(64, 71)
Form1.Line (64, 84)-(64, 85)
Form1.Line (64, 90)-(64, 120)
Form1.Line (64, 125)-(64, 126)
Form1.Line (64, 127)-(64, 132)
Form1.Line (64, 144)-(64, 145)
Form1.Line (64, 147)-(64, 149)
Form1.Line (65, 42)-(65, 73)
Form1.Line (65, 88)-(65, 116)
Form1.Line (65, 128)-(65, 132)
Form1.Line (65, 148)-(65, 149)
Form1.Line (66, 43)-(66, 48)
Form1.Line (66, 51)-(66, 78)
Form1.Line (66, 81)-(66, 82)
Form1.Line (66, 87)-(66, 106)
Form1.Line (66, 125)-(66, 128)
Form1.Line (66, 129)-(66, 130)
Form1.Line (66, 145)-(66, 148)
Form1.Line (67, 43)-(67, 47)
Form1.Line (67, 53)-(67, 92)
Form1.Line (67, 128)-(67, 130)
Form1.Line (68, 45)-(68, 46)
Form1.Line (68, 55)-(68, 89)
Form1.Line (69, 56)-(69, 87)
Form1.Line (69, 92)-(69, 93)
Form1.Line (70, 57)-(70, 86)
Form1.Line (70, 91)-(70, 93)
Form1.Line (70, 94)-(70, 96)
Form1.Line (70, 111)-(70, 112)
Form1.Line (71, 57)-(71, 85)
Form1.Line (71, 93)-(71, 96)
Form1.Line (71, 112)-(71, 113)
Form1.Line (72, 57)-(72, 84)
Form1.Line (72, 89)-(72, 92)
Form1.Line (72, 93)-(72, 96)
Form1.Line (72, 114)-(72, 116)
Form1.Line (73, 53)-(73, 54)
Form1.Line (73, 56)-(73, 59)
Form1.Line (73, 60)-(73, 84)
Form1.Line (73, 93)-(73, 96)
Form1.Line (73, 109)-(73, 111)
Form1.Line (73, 113)-(73, 116)
Form1.Line (73, 123)-(73, 125)
Form1.Line (74, 54)-(74, 58)
Form1.Line (74, 61)-(74, 83)
Form1.Line (74, 112)-(74, 116)
Form1.Line (74, 118)-(74, 125)
Form1.Line (75, 66)-(75, 81)
Form1.Line (75, 82)-(75, 83)
Form1.Line (75, 90)-(75, 93)
Form1.Line (75, 94)-(75, 95)
Form1.Line (75, 109)-(75, 111)
Form1.Line (75, 113)-(75, 126)
Form1.Line (76, 67)-(76, 70)
Form1.Line (76, 93)-(76, 94)
Form1.Line (76, 110)-(76, 123)
Form1.Line (76, 124)-(76, 126)
Form1.Line (77, 67)-(77, 69)
Form1.Line (77, 82)-(77, 83)
Form1.Line (77, 107)-(77, 126)
Form1.Line (78, 67)-(78, 70)
Form1.Line (78, 71)-(78, 72)
Form1.Line (78, 82)-(78, 83)
Form1.Line (78, 104)-(78, 126)
Form1.Line (79, 69)-(79, 70)
Form1.Line (79, 81)-(79, 83)
Form1.Line (79, 101)-(79, 126)
Form1.Line (80, 80)-(80, 84)
Form1.Line (80, 98)-(80, 126)
Form1.Line (81, 79)-(81, 84)
Form1.Line (81, 95)-(81, 114)
Form1.Line (81, 116)-(81, 126)
Form1.Line (82, 78)-(82, 83)
Form1.Line (82, 92)-(82, 93)
Form1.Line (82, 96)-(82, 114)
Form1.Line (82, 118)-(82, 126)
Form1.Line (83, 77)-(83, 82)
Form1.Line (83, 97)-(83, 115)
Form1.Line (83, 118)-(83, 126)
Form1.Line (84, 76)-(84, 82)
Form1.Line (84, 98)-(84, 99)
Form1.Line (84, 100)-(84, 115)
Form1.Line (84, 119)-(84, 126)
Form1.Line (85, 74)-(85, 81)
Form1.Line (85, 98)-(85, 116)
Form1.Line (85, 120)-(85, 126)
Form1.Line (85, 129)-(85, 130)
Form1.Line (86, 73)-(86, 81)
Form1.Line (86, 99)-(86, 116)
Form1.Line (86, 121)-(86, 123)
Form1.Line (86, 125)-(86, 126)
Form1.Line (86, 128)-(86, 129)
Form1.Line (87, 72)-(87, 82)
Form1.Line (87, 100)-(87, 117)
Form1.Line (88, 71)-(88, 82)
Form1.Line (88, 101)-(88, 117)
Form1.Line (89, 71)-(89, 82)
Form1.Line (89, 101)-(89, 117)
Form1.Line (89, 131)-(89, 132)
Form1.Line (90, 71)-(90, 83)
Form1.Line (90, 101)-(90, 118)
Form1.Line (91, 70)-(91, 79)
Form1.Line (91, 102)-(91, 124)
Form1.Line (92, 70)-(92, 79)
Form1.Line (92, 102)-(92, 126)
Form1.Line (93, 70)-(93, 79)
Form1.Line (93, 102)-(93, 126)
Form1.Line (93, 133)-(93, 135)
Form1.Line (94, 70)-(94, 78)
Form1.Line (94, 103)-(94, 126)
Form1.Line (95, 70)-(95, 77)
Form1.Line (95, 103)-(95, 126)
Form1.Line (95, 137)-(95, 139)
Form1.Line (96, 70)-(96, 77)
Form1.Line (96, 103)-(96, 126)
Form1.Line (96, 137)-(96, 139)
Form1.Line (97, 70)-(97, 77)
Form1.Line (97, 103)-(97, 126)
Form1.Line (97, 136)-(97, 137)
Form1.Line (97, 142)-(97, 143)
Form1.Line (98, 70)-(98, 76)
Form1.Line (98, 104)-(98, 126)
Form1.Line (98, 128)-(98, 129)
Form1.Line (98, 136)-(98, 137)
Form1.Line (98, 142)-(98, 145)
Form1.Line (99, 70)-(99, 76)
Form1.Line (99, 104)-(99, 109)
Form1.Line (99, 114)-(99, 117)
Form1.Line (99, 121)-(99, 126)
Form1.Line (99, 141)-(99, 144)
Form1.Line (99, 146)-(99, 147)
Form1.Line (100, 70)-(100, 76)
Form1.Line (100, 103)-(100, 104)
Form1.Line (100, 106)-(100, 108)
Form1.Line (100, 114)-(100, 116)
Form1.Line (100, 121)-(100, 127)
Form1.Line (100, 141)-(100, 142)
Form1.Line (101, 69)-(101, 74)
Form1.Line (101, 100)-(101, 101)
Form1.Line (101, 106)-(101, 108)
Form1.Line (101, 114)-(101, 116)
Form1.Line (101, 121)-(101, 122)
Form1.Line (101, 141)-(101, 142)
Form1.Line (101, 149)-(101, 150)
Form1.Line (102, 69)-(102, 74)
Form1.Line (102, 99)-(102, 101)
Form1.Line (102, 107)-(102, 119)
Form1.Line (102, 121)-(102, 122)
Form1.Line (102, 130)-(102, 131)
Form1.Line (102, 149)-(102, 151)
Form1.Line (103, 67)-(103, 74)
Form1.Line (103, 98)-(103, 101)
Form1.Line (103, 107)-(103, 123)
Form1.Line (103, 130)-(103, 131)
Form1.Line (103, 148)-(103, 152)
Form1.Line (104, 66)-(104, 68)
Form1.Line (104, 98)-(104, 102)
Form1.Line (104, 105)-(104, 125)
Form1.Line (104, 148)-(104, 151)
Form1.Line (105, 99)-(105, 127)
Form1.Line (105, 147)-(105, 150)
Form1.Line (105, 153)-(105, 154)
Form1.Line (106, 103)-(106, 126)
Form1.Line (106, 147)-(106, 149)
Form1.Line (107, 51)-(107, 54)
Form1.Line (107, 103)-(107, 126)
Form1.Line (107, 147)-(107, 148)
Form1.Line (108, 48)-(108, 56)
Form1.Line (108, 102)-(108, 126)
Form1.Line (108, 155)-(108, 156)
Form1.Line (108, 163)-(108, 164)
Form1.Line (109, 46)-(109, 49)
Form1.Line (109, 50)-(109, 57)
Form1.Line (109, 99)-(109, 126)
Form1.Line (109, 155)-(109, 157)
Form1.Line (110, 45)-(110, 47)
Form1.Line (110, 52)-(110, 58)
Form1.Line (110, 101)-(110, 125)
Form1.Line (110, 135)-(110, 136)
Form1.Line (110, 140)-(110, 141)
Form1.Line (110, 154)-(110, 155)
Form1.Line (111, 43)-(111, 46)
Form1.Line (111, 49)-(111, 50)
Form1.Line (111, 52)-(111, 58)
Form1.Line (111, 101)-(111, 125)
Form1.Line (111, 135)-(111, 136)
Form1.Line (111, 140)-(111, 141)
Form1.Line (111, 153)-(111, 154)
Form1.Line (111, 165)-(111, 166)
Form1.Line (111, 169)-(111, 170)
Form1.Line (112, 42)-(112, 45)
Form1.Line (112, 52)-(112, 59)
Form1.Line (112, 100)-(112, 124)
Form1.Line (112, 135)-(112, 136)
Form1.Line (112, 140)-(112, 141)
Form1.Line (112, 167)-(112, 170)
Form1.Line (113, 41)-(113, 46)
Form1.Line (113, 51)-(113, 59)
Form1.Line (113, 99)-(113, 123)
Form1.Line (113, 135)-(113, 137)
Form1.Line (113, 139)-(113, 141)
Form1.Line (113, 159)-(113, 160)
Form1.Line (113, 167)-(113, 169)
Form1.Line (113, 170)-(113, 171)
Form1.Line (114, 40)-(114, 47)
Form1.Line (114, 49)-(114, 59)
Form1.Line (114, 99)-(114, 115)
Form1.Line (114, 117)-(114, 122)
Form1.Line (114, 131)-(114, 132)
Form1.Line (114, 140)-(114, 141)
Form1.Line (114, 145)-(114, 146)
Form1.Line (114, 158)-(114, 160)
Form1.Line (114, 167)-(114, 168)
Form1.Line (115, 44)-(115, 60)
Form1.Line (115, 98)-(115, 114)
Form1.Line (115, 132)-(115, 133)
Form1.Line (115, 139)-(115, 141)
Form1.Line (115, 144)-(115, 146)
Form1.Line (115, 157)-(115, 159)
Form1.Line (116, 44)-(116, 60)
Form1.Line (116, 97)-(116, 113)
Form1.Line (116, 144)-(116, 145)
Form1.Line (116, 169)-(116, 173)
Form1.Line (117, 44)-(117, 61)
Form1.Line (117, 96)-(117, 113)
Form1.Line (117, 144)-(117, 145)
Form1.Line (117, 168)-(117, 171)
Form1.Line (117, 172)-(117, 173)
Form1.Line (118, 44)-(118, 50)
Form1.Line (118, 52)-(118, 62)
Form1.Line (118, 95)-(118, 112)
Form1.Line (118, 127)-(118, 128)
Form1.Line (118, 143)-(118, 145)
Form1.Line (118, 162)-(118, 163)
Form1.Line (118, 168)-(118, 169)
Form1.Line (119, 44)-(119, 47)
Form1.Line (119, 53)-(119, 65)
Form1.Line (119, 94)-(119, 112)
Form1.Line (119, 128)-(119, 130)
Form1.Line (119, 144)-(119, 145)
Form1.Line (119, 147)-(119, 148)
Form1.Line (120, 44)-(120, 47)
Form1.Line (120, 49)-(120, 50)
Form1.Line (120, 51)-(120, 52)
Form1.Line (120, 53)-(120, 68)
Form1.Line (120, 94)-(120, 111)
Form1.Line (120, 128)-(120, 129)
Form1.Line (120, 147)-(120, 148)
Form1.Line (121, 44)-(121, 48)
Form1.Line (121, 49)-(121, 50)
Form1.Line (121, 52)-(121, 69)
Form1.Line (121, 93)-(121, 111)
Form1.Line (121, 115)-(121, 116)
Form1.Line (121, 119)-(121, 120)
Form1.Line (121, 123)-(121, 124)
Form1.Line (121, 146)-(121, 148)
Form1.Line (121, 161)-(121, 164)
Form1.Line (121, 168)-(121, 171)
Form1.Line (122, 45)-(122, 49)
Form1.Line (122, 51)-(122, 72)
Form1.Line (122, 92)-(122, 110)
Form1.Line (122, 114)-(122, 120)
Form1.Line (122, 123)-(122, 125)
Form1.Line (122, 127)-(122, 128)
Form1.Line (122, 146)-(122, 147)
Form1.Line (122, 160)-(122, 161)
Form1.Line (122, 164)-(122, 165)
Form1.Line (122, 168)-(122, 172)
Form1.Line (123, 45)-(123, 74)
Form1.Line (123, 91)-(123, 110)
Form1.Line (123, 113)-(123, 122)
Form1.Line (123, 123)-(123, 126)
Form1.Line (123, 165)-(123, 167)
Form1.Line (123, 170)-(123, 172)
Form1.Line (124, 44)-(124, 76)
Form1.Line (124, 90)-(124, 109)
Form1.Line (124, 113)-(124, 123)
Form1.Line (124, 150)-(124, 151)
Form1.Line (125, 43)-(125, 77)
Form1.Line (125, 89)-(125, 109)
Form1.Line (125, 112)-(125, 123)
Form1.Line (125, 149)-(125, 151)
Form1.Line (126, 42)-(126, 79)
Form1.Line (126, 88)-(126, 123)
Form1.Line (126, 148)-(126, 150)
Form1.Line (127, 46)-(127, 48)
Form1.Line (127, 49)-(127, 80)
Form1.Line (127, 87)-(127, 123)
Form1.Line (127, 149)-(127, 150)
Form1.Line (127, 163)-(127, 170)
Form1.Line (128, 49)-(128, 71)
Form1.Line (128, 73)-(128, 81)
Form1.Line (128, 86)-(128, 123)
Form1.Line (128, 153)-(128, 155)
Form1.Line (128, 166)-(128, 169)
Form1.Line (129, 48)-(129, 72)
Form1.Line (129, 76)-(129, 123)
Form1.Line (129, 151)-(129, 153)
Form1.Line (129, 168)-(129, 169)
Form1.Line (130, 47)-(130, 75)
Form1.Line (130, 78)-(130, 123)
Form1.Line (130, 149)-(130, 152)
Form1.Line (131, 46)-(131, 78)
Form1.Line (131, 82)-(131, 123)
Form1.Line (131, 149)-(131, 151)
Form1.Line (132, 46)-(132, 80)
Form1.Line (132, 82)-(132, 83)
Form1.Line (132, 84)-(132, 123)
Form1.Line (133, 45)-(133, 123)
Form1.Line (133, 164)-(133, 167)
Form1.Line (134, 45)-(134, 65)
Form1.Line (134, 71)-(134, 123)
Form1.Line (134, 155)-(134, 156)
Form1.Line (134, 166)-(134, 167)
Form1.Line (135, 45)-(135, 64)
Form1.Line (135, 76)-(135, 123)
Form1.Line (135, 154)-(135, 156)
Form1.Line (136, 44)-(136, 63)
Form1.Line (136, 83)-(136, 123)
Form1.Line (136, 145)-(136, 146)
Form1.Line (136, 153)-(136, 155)
Form1.Line (137, 44)-(137, 63)
Form1.Line (137, 83)-(137, 123)
Form1.Line (137, 144)-(137, 146)
Form1.Line (137, 152)-(137, 154)
Form1.Line (138, 44)-(138, 62)
Form1.Line (138, 82)-(138, 123)
Form1.Line (138, 145)-(138, 146)
Form1.Line (138, 152)-(138, 154)
Form1.Line (138, 163)-(138, 165)
Form1.Line (139, 44)-(139, 61)
Form1.Line (139, 82)-(139, 123)
Form1.Line (139, 145)-(139, 147)
Form1.Line (139, 153)-(139, 154)
Form1.Line (140, 44)-(140, 61)
Form1.Line (140, 83)-(140, 123)
Form1.Line (140, 133)-(140, 134)
Form1.Line (140, 139)-(140, 142)
Form1.Line (140, 145)-(140, 147)
Form1.Line (140, 153)-(140, 154)
Form1.Line (141, 44)-(141, 61)
Form1.Line (141, 83)-(141, 123)
Form1.Line (141, 131)-(141, 132)
Form1.Line (141, 137)-(141, 139)
Form1.Line (141, 141)-(141, 143)
Form1.Line (141, 163)-(141, 164)
Form1.Line (142, 9)-(142, 10)
Form1.Line (142, 44)-(142, 61)
Form1.Line (142, 82)-(142, 123)
Form1.Line (142, 132)-(142, 133)
Form1.Line (142, 137)-(142, 138)
Form1.Line (142, 141)-(142, 143)
Form1.Line (142, 154)-(142, 155)
Form1.Line (142, 162)-(142, 164)
Form1.Line (143, 9)-(143, 13)
Form1.Line (143, 45)-(143, 61)
Form1.Line (143, 81)-(143, 123)
Form1.Line (143, 137)-(143, 138)
Form1.Line (144, 9)-(144, 14)
Form1.Line (144, 45)-(144, 61)
Form1.Line (144, 80)-(144, 123)
Form1.Line (144, 152)-(144, 153)
Form1.Line (145, 9)-(145, 14)
Form1.Line (145, 45)-(145, 61)
Form1.Line (145, 64)-(145, 69)
Form1.Line (145, 78)-(145, 123)
Form1.Line (145, 164)-(145, 165)
Form1.Line (146, 9)-(146, 15)
Form1.Line (146, 46)-(146, 71)
Form1.Line (146, 76)-(146, 82)
Form1.Line (146, 83)-(146, 123)
Form1.Line (146, 154)-(146, 155)
Form1.Line (146, 161)-(146, 165)
Form1.Line (147, 9)-(147, 16)
Form1.Line (147, 46)-(147, 72)
Form1.Line (147, 73)-(147, 81)
Form1.Line (147, 83)-(147, 123)
Form1.Line (147, 149)-(147, 150)
Form1.Line (147, 152)-(147, 154)
Form1.Line (147, 165)-(147, 166)
Form1.Line (148, 10)-(148, 16)
Form1.Line (148, 47)-(148, 79)
Form1.Line (148, 82)-(148, 83)
Form1.Line (148, 84)-(148, 123)
Form1.Line (148, 148)-(148, 149)
Form1.Line (149, 10)-(149, 17)
Form1.Line (149, 47)-(149, 77)
Form1.Line (149, 81)-(149, 123)
Form1.Line (149, 148)-(149, 149)
Form1.Line (149, 160)-(149, 161)
Form1.Line (149, 166)-(149, 167)
Form1.Line (150, 10)-(150, 18)
Form1.Line (150, 48)-(150, 74)
Form1.Line (150, 78)-(150, 83)
Form1.Line (150, 85)-(150, 123)
Form1.Line (150, 145)-(150, 146)
Form1.Line (150, 148)-(150, 149)
Form1.Line (150, 165)-(150, 167)
Form1.Line (151, 11)-(151, 19)
Form1.Line (151, 49)-(151, 73)
Form1.Line (151, 75)-(151, 83)
Form1.Line (151, 85)-(151, 122)
Form1.Line (151, 148)-(151, 149)
Form1.Line (151, 167)-(151, 168)
Form1.Line (152, 12)-(152, 20)
Form1.Line (152, 51)-(152, 81)
Form1.Line (152, 86)-(152, 122)
Form1.Line (153, 12)-(153, 21)
Form1.Line (153, 52)-(153, 79)
Form1.Line (153, 87)-(153, 122)
Form1.Line (153, 157)-(153, 159)
Form1.Line (153, 160)-(153, 161)
Form1.Line (153, 164)-(153, 166)
Form1.Line (154, 14)-(154, 22)
Form1.Line (154, 54)-(154, 77)
Form1.Line (154, 87)-(154, 122)
Form1.Line (154, 149)-(154, 150)
Form1.Line (154, 165)-(154, 169)
Form1.Line (155, 15)-(155, 24)
Form1.Line (155, 55)-(155, 75)
Form1.Line (155, 88)-(155, 122)
Form1.Line (155, 166)-(155, 169)
Form1.Line (156, 17)-(156, 25)
Form1.Line (156, 55)-(156, 69)
Form1.Line (156, 73)-(156, 74)
Form1.Line (156, 89)-(156, 122)
Form1.Line (156, 154)-(156, 155)
Form1.Line (156, 156)-(156, 157)
Form1.Line (156, 168)-(156, 169)
Form1.Line (157, 18)-(157, 27)
Form1.Line (157, 55)-(157, 67)
Form1.Line (157, 89)-(157, 122)
Form1.Line (157, 150)-(157, 151)
Form1.Line (157, 168)-(157, 169)
Form1.Line (158, 19)-(158, 29)
Form1.Line (158, 54)-(158, 65)
Form1.Line (158, 90)-(158, 121)
Form1.Line (158, 155)-(158, 156)
Form1.Line (158, 157)-(158, 158)
Form1.Line (159, 21)-(159, 32)
Form1.Line (159, 52)-(159, 64)
Form1.Line (159, 91)-(159, 121)
Form1.Line (159, 157)-(159, 158)
Form1.Line (159, 159)-(159, 160)
Form1.Line (159, 163)-(159, 164)
Form1.Line (160, 23)-(160, 35)
Form1.Line (160, 49)-(160, 63)
Form1.Line (160, 92)-(160, 121)
Form1.Line (160, 153)-(160, 155)
Form1.Line (160, 156)-(160, 157)
Form1.Line (160, 158)-(160, 159)
Form1.Line (160, 160)-(160, 162)
Form1.Line (160, 163)-(160, 164)
Form1.Line (161, 24)-(161, 41)
Form1.Line (161, 43)-(161, 61)
Form1.Line (161, 93)-(161, 122)
Form1.Line (161, 153)-(161, 155)
Form1.Line (161, 164)-(161, 165)
Form1.Line (162, 26)-(162, 59)
Form1.Line (162, 94)-(162, 122)
Form1.Line (162, 154)-(162, 155)
Form1.Line (163, 29)-(163, 56)
Form1.Line (163, 94)-(163, 122)
Form1.Line (164, 31)-(164, 54)
Form1.Line (164, 94)-(164, 122)
Form1.Line (164, 168)-(164, 169)
Form1.Line (165, 34)-(165, 51)
Form1.Line (165, 94)-(165, 122)
Form1.Line (166, 39)-(166, 45)
Form1.Line (166, 94)-(166, 122)
Form1.Line (167, 94)-(167, 122)
Form1.Line (168, 94)-(168, 122)
Form1.Line (169, 95)-(169, 123)
Form1.Line (170, 95)-(170, 123)
Form1.Line (171, 96)-(171, 123)
Form1.Line (172, 96)-(172, 123)
Form1.Line (173, 96)-(173, 124)
Form1.Line (174, 40)-(174, 41)
Form1.Line (174, 96)-(174, 124)
Form1.Line (175, 43)-(175, 44)
Form1.Line (175, 96)-(175, 124)
Form1.Line (176, 96)-(176, 124)
Form1.Line (177, 46)-(177, 47)
Form1.Line (177, 81)-(177, 82)
Form1.Line (177, 96)-(177, 125)
Form1.Line (178, 97)-(178, 125)
Form1.Line (179, 94)-(179, 95)
Form1.Line (179, 97)-(179, 125)
Form1.Line (180, 96)-(180, 125)
Form1.Line (181, 98)-(181, 125)
Form1.Line (182, 98)-(182, 126)
Form1.Line (183, 98)-(183, 126)
Form1.Line (184, 99)-(184, 126)
Form1.Line (185, 99)-(185, 126)
Form1.Line (186, 99)-(186, 126)
Form1.Line (187, 100)-(187, 126)
Form1.Line (188, 100)-(188, 126)
Form1.Line (189, 49)-(189, 50)
Form1.Line (189, 100)-(189, 127)
Form1.Line (190, 101)-(190, 126)
Form1.Line (191, 66)-(191, 67)
Form1.Line (191, 101)-(191, 127)
Form1.Line (192, 101)-(192, 106)
Form1.Line (192, 107)-(192, 127)
Form1.Line (193, 74)-(193, 75)
Form1.Line (193, 102)-(193, 127)
Form1.Line (194, 52)-(194, 53)
Form1.Line (194, 102)-(194, 127)
Form1.Line (195, 84)-(195, 86)
Form1.Line (195, 102)-(195, 127)
Form1.Line (196, 47)-(196, 48)
Form1.Line (196, 103)-(196, 127)
Form1.Line (197, 46)-(197, 47)
Form1.Line (197, 103)-(197, 127)
Form1.Line (198, 57)-(198, 58)
Form1.Line (198, 103)-(198, 127)
Form1.Line (199, 43)-(199, 44)
Form1.Line (199, 103)-(199, 127)
Form1.Line (200, 40)-(200, 41)
Form1.Line (200, 104)-(200, 127)
Form1.Line (201, 104)-(201, 127)
Form1.Line (202, 105)-(202, 127)
Form1.Line (203, 60)-(203, 61)
Form1.Line (203, 105)-(203, 127)
Form1.Line (204, 91)-(204, 92)
Form1.Line (204, 105)-(204, 127)
Form1.Line (205, 106)-(205, 127)
Form1.Line (206, 106)-(206, 127)
Form1.Line (207, 24)-(207, 25)
Form1.Line (207, 107)-(207, 127)
Form1.Line (208, 23)-(208, 24)
Form1.Line (208, 107)-(208, 117)
Form1.Line (208, 118)-(208, 127)
Form1.Line (209, 103)-(209, 104)
Form1.Line (209, 107)-(209, 127)
Form1.Line (210, 107)-(210, 109)
Form1.Line (210, 110)-(210, 127)
Form1.Line (211, 22)-(211, 23)
Form1.Line (211, 29)-(211, 31)
Form1.Line (211, 56)-(211, 57)
Form1.Line (211, 114)-(211, 127)
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

14   голосов , оценка 4.143 из 5
Похожие ответы