Страница: 1 |
Страница: 1 |
Вопрос: Помогите начинающему
Добавлено: 25.11.09 00:47
Автор вопроса: TextBox1
Люди добрые,помогите решить задачку. Надо прописать массив в следующий код:
Imports System.Console
Module abc
Sub Main()
Dim mesto() As String = {"Москва", "Пенза", "Калуга"}
Dim temperaturen(,) As SByte = _
{{2, 3, 1}, {3, 6, 4}, {6, 8, 10} _
, {10, 12, 13}, {14, 15, 15}, {19, 18, 19} _
, {18, 16, 20}, {23, 24, 25}, {25, 22, 22} _
, {15, 14, 15}, {10, 11, 13}, {9, 8, 7}}
Dim iMesto As Byte
Dim iMonth As Byte
ReadLine()
End Sub
End Module
чтобы получилось следующее:
-------------------------------
Месяц Москва Пенза Калуга
1 2 3 1
2 3 6 4
3 6 8 10
4 10 12 13
5 14 15 15
6 19 18 19
7 18 16 20
8 23 24 25
9 25 22 22
10 15 14 15
11 10 11 13
12 9 8 7
-------------------------------
Что только не делал, фигня какая-то получается.
Ответы
Всего ответов: 3
Номер ответа: 1
Автор ответа:
TextBox1
Вопросов: 2
Ответов: 2
Профиль | | #1
Добавлено: 25.11.09 01:00
Так будет более понятнее. Черточки я поставил, чтобы цифры в кучу не сходились
Месяц Москва Пенза Калуга
1------2-----3------1
2------3-----6------4
3------6-----8-----10
4-----10----12-----13
5-----14----15-----15
6-----19----18-----19
7------18---16-----20
8------23---24-----25
9------25---22-----22
10------15---14-----15
11------10---11-----13
12-------9----8------7
Номер ответа: 2
Автор ответа:
UnDeAdZak
Вопросов: 80
Ответов: 476
Профиль | | #2
Добавлено: 25.11.09 10:08
Console.readline('В скобках пишеш чаго тебе надо вывести в консоль)
Номер ответа: 3
Автор ответа:
UnDeAdZak
Вопросов: 80
Ответов: 476
Профиль | | #3
Добавлено: 25.11.09 10:10
Сорри ошибся(((