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

тематическая модель

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

Поможем написать учебную работу

Если у вас возникли сложности с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой - мы готовы помочь.

Предоплата всего

от 25%

Подписываем

договор

Выберите тип работы:

Скидка 25% при заказе до 25.2.2025


Поиск

Вариант 27

Павлов В. ЭС-104

  1.  Словесное описание.

Найти минимальное значение  функции    на  промежутке

3 < Х < 9 с шагом х= 0.3. Напечатать таблицу значений функции.

  1.  Математическая модель.

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

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

  1.  Алгоритм

  1.  Код программы

Private Sub Command1_Click()

Dim X As Single

Dim Ymin As Single

Dim Y As Single

X = 3

Ymin = Sqr(X) - Cos(X)

For X = 3 To 9 Step 0.3

Y = Sqr(X) - Cos(X)

If Ymin > Y Then

Ymin = Y

End If

Next

Print "Ymin=" & Ymin

End Sub

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

  1.  Словесное описание

Определить индексы первого положительного элемента К-й  строки матрицы Т размерности  М*N.

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

  1.  Математическая модель

  1.  Входные данные: K, M, N, {T} - вещественные

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

  1.  Алгоритм

  1.  Код программы

Private Sub Command1_Click()

Dim i As Integer

Dim j As Integer

Dim K As Integer

Dim M As Integer

Dim N As Integer

Dim T() As Single

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

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

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

ReDim T(1 To M, 1 To N)

For i = 1 To M

For j = 1 To N

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

Next

Next

For j = 1 To N

If T(K, j) = 0 Then

GoTo 1

End If

Next

1:

MsgBox ("T(" & K & "," & j & ")=" & T(K, j))

End Sub

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

2


Конец

10

ачало

x

1

x<=9

x=x+0.3

4

8

да

x=3

2

Ymin

9

Y=sqr(x)-cos(x)

Ymin>Y

Ymin= sqr(x)-cos(x)

3

Ymin=Y

7

0

5

6

K, M, N, {T}

0

1

i<=M

3

да

нет

K, j

Конец

13

14

T(K,j)=0

да

нет

11

j<=N

5

да

нет

i=1

2

j=1

4

j=j+1

8

T(i,j)

i=i+1

j<=N

10

да

нет

j=1

9

j=j+1

12

6

7

начало




1. Философия эпохи Возрождения Философская эпоха может быть представлена полноценно лишь с учетом своего ху
2. пособие по уходу за ребенком до 15 лет на одного ребенка ~ 282202 рублей 40 от МРОТ если з-п 10000 ~ то 40 от з-п ~ 4000
3. Статья Учёт и анализ постоянных разниц при определении финансового результата
4. Сокращение скелетной мышцы вызывается- входом медиатора внутрь мышечного волокна; локальным отв
5.  Подготовительная часть судебного заседания 2
6. I. Принцип относительности- никакие опыты механические электрические оптические проведенные внутри данно
7. вариант эволюционного движения предполагающий что состояние системы в момент времени Tn обусловлено ее сос
8. Проектування комп~ютерних систем та мереж Виконав- ст.
9. уаджх лицо в арабском языке на котором был ниспослан Коран
10. L vid es sueno можно перевести и как Жизнь есть мечта