398

аргумента Хн

аргумента Хк

аргумента dx

0

-5

5

0,5

1

-8

8

0,8

2

-4

4

0,4

3

-3

6

0,3

4

-2

2

0,2

5

-2

10

1

6

-3

3

0,6

7

-1

7

0,7

8

-8

0

0,8

9

0

9

0,9

Последняя цифра номера зачетной книжки

Начало текста

Предпоследняя цифра номера зачетной книжки

ОКОНЧАНИЕ

ТЕКСТА

0

Для элементов, не кратных 3, в двух одномерных массивах одинаковой длины

1

Для четных элементов трех одномерных массивов разной длины

2

Для элементов, стоящих на нечетных местах, в двух одномерных массивах

произвольной длины

3

В трех одномерных массивах одинаковой длины

4

Для элементов, стоящих на четных местах, одномерного массива произвольной

длины

5

Для элементов, кратных 5, одномерного массива произвольной длины

6

В первой половине двух одномерных массивов разной длины

7

Для элементов, не кратных 4, двух одномерных массивов разной длины

8

В двух одномерных массивах одинаковой длины

9

Для нечетных элементов двух одномерных массивов произвольной длины

9

x

γ

A

(D βx)3

x

B

Предпоследняя цифра номера зачетной книжки

N

f2

f4

0

α β

2 lg

α x

C D

1

1,2sin(x π)4

0,1 ln(cos(A C)2)

2

ex (β π)0,5

sinA

cos(B x)

N

f2

f4

2,1 lgx2

131,5

3

x2 α

4

4,8 Clnx

0,0273 esin(x β)

5

xsin2,5

lgα

cos(2 C)

6

5 tgx e2

1 0,3cos(7x)

7

2 (α β)3

A C

ex

8

3,8 ctg(2D x)5

sin2α 1,7

9

0,3 e1,5β

A

cos(2x)

γ

N

Условие_1

Условие_2

Условие_3

Условие_4

0

х > 0

x > 1

x > 2

x > 3

1

х 1

1 < x < 2

х 2

Нет

2

Нет

2 < x < 3

х = 3

3 < x < 4

3

Нет

x<0,9

x = 0,9

0,9 < x < 8

4

0 < x < 2

Нет

x = 2

2< x < 4,7

5

x < -1,5

х = -1,5

х > -1,5

x = 3,5

6

x < 0

x = 0

Нет

0 < x < 1,5

7

-2 < x < 0

х = 0

Нет

0 < x < 1,5

8

х - 2,3

Нет

x 2

-2,3 < x < 2

9

- 3 < x < -1

x = -1

-1 < x < 10

Нет

N

Начальное значение

Конечное значение

Шаг изменения

аргумента Хн

аргумента Хк

аргумента dx

0

0

11

1

1

-15

6

1

2

2

4

0,2

3

-12,5

5,5

1,5

4

0

4,2

0,2

5

-3

5,5

0,5

6

-9

1

1

7

-2

1,5

0,25

8

-10

4,5

0,5

9

-10

5

0,75

Последняя цифра номера зачетной книжки

Начало текста

Предпоследняя цифра номера зачетной книжки

ОКОНЧАНИЕ

ТЕКСТА

0

Для нечетных элементов двух одномерных массивов разной длины

1

В первой половине двух одномерных массивов одинаковой длины

2

В трех одномерных массивах произвольной длины

3

Для элементов, стоящих на четных местах, в первой половине одномерного

массива произвольной длины

4

Для элементов, стоящих на местах, не кратных 5, в одномерном массиве

произвольной длины

5

Для четных элементах двух одномерных массивов разной длины

6

Во второй половине двух одномерных массивов одинаковой длины

7

В одномерном массиве произвольной длины

8

В двух одномерных массивах разной длины

9

В двух одномерных массивах

Главная

Побочная

I=J

I+J=N+1

I<J

I+J<N+1

I>J

I+J>N+

Решение

Sub Zadanie_1()

Const N=6

‘ Размерность матрицы

Dim A(N,N) as Integer, I as Integer, J as Integer

Dim Min as Integer, Imin as Integer, Jmin as Integer

Randomize

For I=1 To N

For J=1 To N

A(I,J) = Int(Rnd*10 – 5)

‘ Формирование матрицы

Cells(I,J) = A(I,J)

‘ случайным образом

Next J,I

Min = 32000

For I=1 To N

For J=1 To N

If (A(I,J)<=Min) And (A(I,J) Mod 2<>0) And (I>J) Then

‘ Поиск

Min = A(I,J)

‘ минимума и его

Imin = I

‘ номера строки и

Jmin = J

‘ номера столбца

End If

Next J,I

Cells(N+2,1) = “Min =”

‘ Вывод результатов

Cells(N+2,2) = Min

Cells(N+3,1) = “IMin =”

Cells(N+3,2) = IMin

Cells(N+4,1) = “JMin =”

For J=1 To M

A(I,J) = Int(Rnd*10 – 5)

Cells(I,J) = A(I,J)

Next J,I

For J=1 To M

‘ Цикл по столбцам

K = 0

‘ Начальное значение

For I=1 To N

‘ Цикл по строкам

If A(I,J) = 0 Then K = K+1

‘ Поиск количества

Next I

‘ Конец цикла по строкам

Cells(N+2,J) = “K =” & K

‘ Вывод результата в J столбец

Next J

‘ Конец цикла по столбцам

End Sub

WorkSheets(“Лист2”).Select

For I=1 To N

For J=1 To M

If I+J>M+1 Then B(I,J) = I

‘ Область под побочной диагональю

If

(I<J) And (I+J < M+1) Then B(I,J) = 5

‘ Верхний треугольник – цифра 5

If

J = 1 Then B(I,J) = 4

‘ Первый столбец – цифра 4

f(x)

sin2

(x 2)

Вычислить все значения функции

на промежутке

x 6

от –3 до 5 с шагом h=0,3 с использованием подпрограммы.

Решение

Function f(x as Single) as Single

‘ Подпрограмма-функция

f = (Sin(x+2))^2/(x-6)

‘ вычисления функции

End Function

Sub Zadanie_3()

Dim x as Single, Y as Single

WorkSheets(“Лист3”).Select

‘ Выбор 3-го листа

Cells(1,1) = “X”

‘ Печать заголовков

Cells(1,2) = “Y”

‘ в первой строке

I = 2

‘ Номер строки для вывода –2

For x = -3 To 5 Step 0.3

Y = f(x)

‘ Вызов функции

Cells(I,1) = x

‘ Вывод значения x

Cells(I,2) = Y

‘ Вывод значения Y

I = I + 1

‘ Номер строки - следующий

Next x

End Sub

ССЫЛКИ НА

N

ВОПРОС

ЛИТЕРАТУРУ:

cтраницы

[Источник]

КЛАССИФИКАЦИЯ ПЭВМ

43-49 [1],

0

182-197 [2],

151-155 [3]

1

ПОНЯТИЕ ИНФОРМАЦИИ; СБОР

105-113 [3]

ИНФОРМАЦИИ

2

ПРИНЦИП ОРГАНИЗАЦИИ

129-130 [3]