Решение задачЗаказ 13584
Исправить ошибку в коде
300
На аукционе
20 декабря 2018 в 17:53
21 декабря
Описание работы
Private Sub КнопкаПреобразовать_Click() ColNul = 0 For i = 1 To M If x(i) = 0 Then ColNul = ColNul + 1 End If Next i Text3.Text = ColNul For i = 3 To N If y(i) = y(i - 1) * y(i - 2) Then y(i) = y(i) * ColNul Next i For i = 1 To N List3.AddItem y(i) Next i End Sub
530
Предоплата 100%
Присылайте весь код и само задание, исправлю, отлажу и помогу.
