Пример выполнения задания 2.4
Условие. Составить блок-схему и программу для решения следующей задачи. Дан двумерный массив А=(aij), i=1,2,...,7; j=1,2,...,8. Найти сумму элементов, больших 5 для каждой строки.
Обозначение: s – сумма элементов строки
Блок-схема
да
нет
Программа
Sub p4()
Dim a (1 to 7, 1 to 8) As Single, i As Integer, j As Integer
Dim s as Single
For i=1 to 7
For j=1 to 8
a(i,j)= Val(InputBox(“Введите массив a”))
Next j
Next i
For i=1 to 7
S=0
For j=1 to 8
If a(i,j) > 5 then s=s+a(i,j)
Next j
MsgBox “s=” & s & “Строка” & i
Next i
End Sub
3. Литература
1. К. Стинсон. Эффективная работа в Windows 95. - СПб.: Питер, 1997.
2. В.Э. Фигурнов. IBM для пользователя. Изд. 7-е. переработанное й дополненное. -М.: ИНФРА-М, 1997.
3. Джон Вейскас. Эффективная работа с Microsoft Access 7.0 для Windows 95. Санкт-Петербург,:Питер, 1997.
4. Марченко А.И., Пасько В.П. Word 7.0 для Windows:-K.: Торгово-издательское бюро BHV, 1996 - 464 с.: ил.
5. Каммингс С. VBA для “чайников”: Пер. с англ.: М.:”Вильямс”, 2000.
6. С.Браун. Visial Basic: учебный курс. – СПб.: Питер, 2001.
7. А.Кинг. WINDOWS 95. - Санкт-Петербург: Питер, 1995.
8. Д.Гукин. Оптимизация работы WINDOWS. Руководство фирмы Microsoft. - М.: Наука, 1995.
9. Каратыгин С.А. и др. Электронный офис. – М.: Восточная книжная компания, 1997.- 768с.
10. А.Алексеев, Г.Евсеев, В.Мураховский, С.Симонович. Новейший самоучитель работы на компьютере. – М.:"Десс", 1999.- 654 с.
11. Сборник задач по программированию. Для студентов всех специальностей. /Составит. С.В.Котлик, Н.С.Перетяка, Л.Н.Комзакова, В.А.Волокитенко. - Одесса: ОГАПТ, 1995.
12. Методические указания к самостоятельной работе по программированию. /Составит. Ю.А.Козак, Л.Н.Комзакова, С.В.Котлик, Ю.Г.Лобода, Н.С.Перетяка. – Одесса: ОГАПТ, 2002.
13. Методические указания к лабораторному практикуму по изучению Windows 95 для студентов всех факультетов и всех форм обучения / Составит. Ю.А.Козак, Комзакова Л.Н., ПеретякаН.С., Лобода Ю.Г.- Одесса: ОГАПТ, 1998
14. Опорный конспект лекций, методические указания и задания к лабораторным работам по теме "Изучение табличного процессора Excel 7.0" для студентов 2 курса всех специальностей дневной и заочной форм обучения. /Составит. Ю.А.Козак, В.Т.Артеменко, А.Б.Куприянов, Ю.Г.Лобода. – Одесса: ОГАПТ, 1999. – 81 с.