Предмет: Русский язык, автор: turdubekovaaizat95

Они (что сделают)..из города

Ответы

Автор ответа: evgeshalovegordeeva
0

Ответ:

уедут

Объяснение:

Предыдущий вопрос
Следующий вопрос
Похожие вопросы
Предмет: Русский язык, автор: маша1162
Разбор слова вуаль как часть речи
2 года назад
Предмет: Українська мова, автор: vipkotik5
71. 1. Спиши. Встав коми. Доведи правильність їх уживання. 2. Поясни правопис виділених слів. 3. Поясни значення одного з прислів"їв (на вибір). 1.Не на слова заважай, а на роботу. 2. Золото в болото впаде та міддю не стане. 3. Вересень холодний але ситий. 4. Біда замучить але й научить. 5. Грудень рік кінчає а зиму починає.
2 года назад
Предмет: Українська мова, автор: Аноним
підскажіть будь ласка синонім слова розлад с префіксом не
Ставлю багато балів
2 года назад
Предмет: Информатика, автор: 2001DANILKA2001
НАПИСАТЬ СЛОВЕСНЫЕ АЛГОРИТМЫ К ДАННЫМ ПРОГРАММАМ, ПОМОГИТЕ!!!
Private Sub CommandButton1_Click()
'Объявление переменных
Dim A As Integer, S As Integer
'Ввод исходных данных
A = Val(Cells(2, 2).Value)
S = 0
i = 0
'Рассчет
While S < A
S = S + 1
i = i + 1
'Вывод результатов
Cells(i + 1, 1).Value = Str(S)
Wend

End Sub
-------------------------------------------------

Private Sub CommandButton1_Click()
'Объявление переменных
Dim R2 As Single, R3 As Single
Dim R1beg As Single, R1End As Single, dR1 As Single
Dim R12 As Single, R13 As Single, R23 As Single
'Ввод исходных данных
R2 = Val(Cells(3, 1).Value)
R3 = Val(Cells(3, 2).Value)
R1beg = Val(Cells(3, 3).Value)
R1End = Val(Cells(3, 4).Value)
dR1 = Val(Cells(3, 5).Value)
'Расчет
NumRow = 6
For R1 = R1beg To R1End Step dR1
R12 = R1 + R2 + (R1 * R2 / R3)
R13 = R1 + R3 + (R1 * R3 / R2)
R23 = R2 + R3 + (R2 * R3 / R1)
Cells(NumRow, 1).Value = Str(R1)
Cells(NumRow, 2).Value = Str(R12)
Cells(NumRow, 3).Value = Str(R13)
Cells(NumRow, 4).Value = Str(R23)

NumRow = NumRow + 1
Next R1
End Sub


Private Sub CommandButton2_Click()
For i = 1 To 5
Cells(3, i).Value = ""
Next i
For j = 6 To 16
Cells(j, 1).Value = ""
Next j
For k = 6 To 16
Cells(k, 2).Value = ""
Next k
For A = 6 To 16
Cells(A, 3).Value = ""
Next A
For b = 6 To 16
Cells(b, 4).Value = ""
Next b
End Sub
8 лет назад
Предмет: Русский язык, автор: Gramotaaaa
просклоня́йте слово́ мышь
8 лет назад