не могу разобраться! - Microsoft Office Excel

Apsalon · 28.12.2010, 17:50

Домой задали сделать блок схему и по ней сделать программу через в EXCEL !!!
Вот 1 задание с которым я разобрался!

Код:

Sub Кнопка1_Щелкнуть()
Dim i As Integer
Dim S As Integer
Dim K As Integer
S = 0
K = 0
Sa = 0
For i = 1 To 10
If Cells(i, 1) < 0 Then
S = S + Cells(i, 1)
K = K + 1
End If
Next i
Sa = S / K
Range("C27") = Sa
End Sub

Вот второе!!В выделеной части не понятно!

может быть можно создать более рациональную блок схему !
Подскажите пожалуйста что с этим делать дальше)
Спасибо!

Если не видно , вот 2 задание!

EducatedFool · 28.12.2010, 18:54

Закрыто за название темы, не соответствующее правилам форума

28.12.2010, 17:50	#1
Apsalon Регистрация: 15.12.2010 Сообщений: 6	не могу разобраться! Домой задали сделать блок схему и по ней сделать программу через в EXCEL !!! Вот 1 задание с которым я разобрался! Код: `Sub Кнопка1_Щелкнуть() Dim i As Integer Dim S As Integer Dim K As Integer S = 0 K = 0 Sa = 0 For i = 1 To 10 If Cells(i, 1) < 0 Then S = S + Cells(i, 1) K = K + 1 End If Next i Sa = S / K Range("C27") = Sa End Sub` Вот второе!!В выделеной части не понятно! может быть можно создать более рациональную блок схему ! Подскажите пожалуйста что с этим делать дальше) Спасибо! Если не видно , вот 2 задание! Последний раз редактировалось Stilet; 28.12.2010 в 18:23.

28.12.2010, 18:54	#2
EducatedFool Программист VBA СуперМодератор Регистрация: 13.07.2008 Сообщений: 6,856	Закрыто за название темы, не соответствующее правилам форума __Полезные надстройки для Excel. Парсинг сайтов и файлов. Макросы любой сложности на заказ. Мониторинг цен конкурентов Последний раз редактировалось EducatedFool; 28.12.2010 в 19:21.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Не могу разобраться!!!	Яна Сафронова	Помощь студентам	11	12.05.2010 17:56
не могу разобраться	Var17	Общие вопросы Delphi	6	27.03.2010 01:21
НЕ МОГУ РАЗОБРАТЬСЯ...	GSV84	HTML и CSS	0	03.02.2010 01:38