Приклад виконання лабораторної роботи № 6

а) Постановка задачі.

Знайти суму перших K від’ємних елементів масиву A={a[i]}.

 

б) Блок-схема алгоритму.

Блок-схему алгоритму розв’язання задачі наведено на рисунку 6.

 
 

 

 


в) Текст програми:

 

Sub Odnovymirniy_masiv ()

' Оголошення змінних

Dim A(20) As Integer

Dim n As Integer, K As Integer

Dim i As Integer

Dim s As Integer

 

' Уведення даних

n = InputBox("Задайте кiлькiсть елементiв n=")

k = InputBox("Задайте кількість перших елементів К=")

 

' Встановлення початкового значення суми

s = 0

For i = 1 To n

A(i) = InputBox("Задайте елемент масива А("+str(i)+")=")

If A(i)<0 And i<=K Then

s = s+A(i)

End If

Next I

 

' Виведення результата

MsgBox("Сума перших елементiв масива s="+str(s))

End Sub

 

г) Контрольний приклад:

Виконаємо тестування програми при таких вихідних даних:

n = 6, K = 4, a={-1, 3, -7, 5, -9, 4 }

 

Результати роботи програми на екрані монітора мають вигляд:

 

Задайте кількість елементів масива n = 6

Задайте кількість елементів на початку масива K = 4

Задайте елемент масива А[1] = -1

Задайте елемент масива А[2] = 3

Задайте елемент масива А[3] = -7

Задайте елемент масива А[4] = 5

Задайте елемент масива А[5] = -9

Задайте елемент масива А[6] = 4

Сума перших елементів масива s = -8

 

Лабораторна робота № 7.
Програмування алгоритмів із структурою вкладених циклів і обробка матриць

Мета роботи - оволодіння практичними навичками програмування алгоритмів із структурою вкладених циклів, використання двовимірних масивів (матриць), уведення та виведення матриць.

Завдання для самостійної підготовки

1. Вивчити:

- правила організації вкладених циклів із урахуванням порядку перебору елементів матриці;

- правила використання прийомів програмування в структурах із вкладеними циклами;

- способи вводу і виводу матриць, які реалізовані в алгоритмічній мові VBA.

2. Розробити алгоритм розв’язування у відповідності із завданням (див. завдання до лабораторної роботи).

3. Скласти програму розв’язування задачі.

4. Підготувати тестовий варіант програми і вхідних даних.


Понравилась статья? Добавь ее в закладку (CTRL+D) и не забудь поделиться с друзьями:  



double arrow
Сейчас читают про: