Будь умным!


У вас вопросы?
У нас ответы:) SamZan.net

Задание 1 Математическое описание

Работа добавлена на сайт samzan.net:


PAGE  1

В-407  Брель И.К. 1 вариант

«Программный элемент НАКОПЛЕНИЕ»

Y

10

Sg

8

7

6

5

17

j=j+1

i<=m

a(i,j)

i=1

j<=n

j=1

16

Конец

15

m, n

P=P*A(i,j)

j<=n

4

3

2

1

Sg=P/(m*n)

8

P=1

нет

0

да

14

13

j=1

Начало

i<=m

i=i+1

Y=0

k

Y= Y+(A(i)/(i+k))

i=i+1

i<=n

A(i)

i=i+1

i<=n

n

Начало

12

11

да

нет

10

9

i=i+1

j=j+1

Конец

0

1

2

5

3

4

6

7

8

9

11

да

нет

нет

да

Задание 1

  1.  Математическое описание.
    1.  Выбор математической модели

Вычислить значение    у = ,

        где А - одномерный массив размерности n. Проанализировать выполнение программы на примере:

                      k = 3,     А = {2,7; 3; -6; 2; 4}

  1.  Входные данные: A, k,  - вещественные

  1.  Выходные данные: y  - вещественные

Задание 2

  1.  Математическое описание.
    1.  Выбор математической модели

 Вычислить  среднее  геометрическое  элементов  матрицы  B размерности m*n.

Для  отладки  программы  матрицу  выбрать самостоятельно.

P=P*A(i,j)

Sg=P/(m*n)

  1.  Входные данные:  A - вещественные
    1.  Выходные данные:  Sg - вещественные

  1.  Алгоритмизация

  1.  Программирование

Private Sub Command1_Click()

Dim n As Integer

Dim i As Integer

Dim k As Single

Dim A() As Single

n = InputBox("Введите размерность массива")

ReDim A(1 To n)

For i = 1 To n

A(i) = InputBox("Введите массив")

Next

k = InputBox("Введите k")

Y = 0

For i = 1 To n

Y = Y + (A(i) / (i + k))

Next

Print "Y=" & Y

End Sub

  1.  Отладочный пример

  1.  Алгоритмизация

  1.  Программирование

Private Sub Command1_Click()

Dim P As Single

Dim Sg As Single

Dim i As Integer

Dim j As Integer

Dim m As Integer

Dim n As Integer

Dim A() As Single

m = InputBox("Введите количество строк массива")

n = InputBox("Введите количество столбцов массива ")

ReDim A(1 To m, 1 To n)

For i = 1 To m

For j = 1 To n

A(i, j) = InputBox("Введите массив")

Next

Next

P = 1

For i = 1 To m

For j = 1 To n

P = P * A(i, j)

Next

Next

Sg = P / (m * n)

Print "Sg=" & Sg

End Sub

  1.  Отладочный пример




1. а гр 409509 и Макухом Романом Вадимовичем Кафедра Физики Ускорителей и Радиационной медицины гр
2.  Методы воспитания детей с оопособые обр
3. тематические основы теории систем Методические указания к лабораторной работе 2 АВТОНОМНЫЕ СИСТЕМ
4. й год 6000й Мерседес подрезает горбатый Запорожец и резко тормозит перед светофором
5. на тему- Государственный долг РФ Выполнила -
6. а 8м 9а 9б 9м
7. . Категория деятельности в психологии Категория деятельности в отечественной психологии является централ
8. Экономика предприятия всех форм обучения Севастополь 2013
9. Дж де Кирико Гебдомерос
10. Бюджетное планирование на предприятии
11. Коммуникационная политика
12. го века по 17ый век
13. ~мір ~ауіпсіздігін негіздері п~ні бойынша тест с~ра~тары Маманды~-5В120100 Ветеринарлы~ медицина5В120200
14. комната вызывает у слушающих образ комнаты- жилое помещение с четырьмя стенами полом потолком окнами и д
15. 121993 Как переводчик выходит на контакт с вами Это происходит чисто по его инициативе или есть причины при к
16. Свободное падение с учётом сопротивления среды
17. Трубадуры
18. УЕБНОЕ ПОСОБИЕ ПО ИЗУЧЕНИЮ ЛЕКСИКИ КИТАЙСКОГО ЯЗЫКА ДЛЯ СТУДЕНТОВ 4-5 КУРСОВ
19. вариант чахохбили вызовет только довольные улыбки на Ваших лицах от поедания этого вкусного блюдаПриятного
20. Лабораторная работа 9 Тема- Элементы векторной алгебры Вариант 1 Практическая часть Задание