Предмет: География, автор: dashutkina2004

Все холодные течения Атлантического океана

Ответы

Автор ответа: EruditSovetnik
0
Канарское лабрадорское фолклендское течение западных ветров бенгальское все вроде
Автор ответа: EruditSovetnik
0
корона такая жёлтая
Автор ответа: dashutkina2004
0
Я отметила
Автор ответа: EruditSovetnik
0
корона слева такая
Автор ответа: EruditSovetnik
0
спасибо
Автор ответа: EruditSovetnik
0
)))
Автор ответа: chornyysuper
0
Гренландское
Лабрадорское
Канарское
Бенгельское
Автор ответа: dashutkina2004
0
Спасибо
Автор ответа: dashutkina2004
0
а тёплые сможешь сказать??
Автор ответа: chornyysuper
0
Норвежское, Гольфстрим, Гвианское, Бразильское
Предыдущий вопрос
Следующий вопрос
Похожие вопросы
Предмет: История, автор: Ulglpd
Воєнна колонізація - це
5 лет назад
Предмет: Физика, автор: golosovmaksim706
дитина масою 25 кг гойдається на гойдалці ; довжина підвісу 2,5 м. З якою силою вона тисне на сидіння у нижній точці траєкторії, якщо швидкість руху в цей может дорівнювати 3м/с
5 лет назад
Предмет: Математика, автор: 121212121314
срочно пожалуйста! очень надо, прям вот очень!! отдаю 25 баллов!
5 лет назад
Предмет: Математика, автор: viktoriyas494
сколько 5 миллиметров?
9 лет назад
Предмет: Информатика, автор: aveez
что не правильно? (basic)

Private Sub CommandButton1_Click()
Dim A(1 To 5, 1 To 5) As Single
Dim i As Integer, j As Integer, k As Integer
Dim sr As String
k = 0
ListBox1.Clear
For i = 1 To 5
sr = ""
For j = 1 To 5
A(i, j) = i + 0,5j
sr = sr + " " + Format(A(i, j), "0.000") + " "
If (A(i, j) > 1) And (A(i, j) < 2,5) Then k = k + 1
Next j
ListBox1.AddItem (sr)
Next i
TextBox1.Text = Str(k)
End Sub.
9 лет назад