Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

I.Информ. Программирование языком VB(кр1)

.pdf
Скачиваний:
10
Добавлен:
07.02.2016
Размер:
410 Кб
Скачать
☆

 

 

 

41

 

 

 

 

7

Text3

Name

txtA

 

 

Text

порожньо

 

 

MultiLine

True

 

 

ScrollBars

3

8

Text4

Name

txtRez

 

 

Text

порожньо

 

 

MultiLine

True

 

 

ScrollBars

3

9

Command1

Name

cmdRun

 

 

Caption

Пуск

2) Програмний код мовою Visual Basic.

Програмний код для кнопки cmdRun (подія Click):

Private Sub cmdRun_Click() Dim m As Integer

Dim n As Integer

Dim i As Integer

Dim j As Integer

Dim p As Single Dim a() As Single

txtA.Text=””

txtRez.Text=”” m=InputBox(“введи число m”)

txtM.Text=CInt(m) n=InputBox(“введи число n”)

txtN.Text=CInt(n) ReDim a(m,n) As Single For i = 1 To m

For j = 1 To n

a(i,j)=InputBox(“Введи елемент a ” & CStr(i) &CStr(j)) txtA.Text=txtA.Text & CStr(a(i,j)) & vbTab

Next j

txtA.Text=txtA.Text & vbCrlf Next i

For i = 1 To m

42

p=1

For j = 1 To n

If a(i,j)>0 Then p=p*a(i,j)

Next j

txtRez.Text=txtRez.Text & ”номер рядку =” & CStr(i) _ & “добуток p=” & CStr(p)

Next i

End Sub

ІV етап. Результати розрахунку.

43

5 ВАРІАНТИ КОНТРОЛЬНИХ ЗАВДАНЬ

5.1 Завдання 1

Варіант 1

1) x = 0.75 0.5 − 0.53 4,

y = 100

 

1

0.5 ln 9−lg 2 tg

 

 

 

 

3

 

15x

2

− 21y

2

,

если

x > y

 

 

 

z =

15y2

+ 21x2

 

если

x ≤ y

 

,

 

 

 

 

 

 

 

 

2)У ≤ Х/2+1,

У≥ Х/2-1,

Х2 +У2 ≤ 1.

Варіант 2

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

1) x = 4−0.25 − (2 2)−4 / 3 tg4,

 

 

 

 

 

 

y = cos(2arctg 15 )

ln

 

2x − 3y

 

,

 

если

 

x

 

 

 

< 5

 

y

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

z =

 

2xe2

+ 3y

 

,если

 

 

x

 

≥ 5

 

y

 

ln

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2)У ≥ 1,

У ≥ Х .

Варіант 3

1) x = 86.9−1/ 4 + (20.3 )−1/ 3 ,

 

y = 491−lg 2 + 5− lg 4

sin(5x + 3y ln 3),

если

 

 

x

 

>

 

y

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

z =

если

 

x

 

 

≤

 

 

y

 

 

 

cos(5x + 3y ln 3),

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2)У ≥ - Х,

Варіант 4

 

 

Х2 +У2 ≤ 1.

 

 

 

 

1)

x =

8.15 3 14.3 ln 2

y = sin(arctg 12 )

 

,

 

24.38 8.7(e2

− e−2 )

 

 

 

2x − 7 y ,

если

min(x, y) < 1

 

 

 

z =

2x + 7 y,

если

min(x, y) ≥ 1

 

 

 

 

 

 

 

44

2)Х2 +У2 ≥ 1,

Варіант 5

 

 

 

 

 

 

Х2 +У2 ≤ 4

.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

1) x = 22.5−1/ 2

− 7.5(2.8−3 / 4 )2 cos1,

y = − lg(1.6e3 )

4x + 3y

,

если

 

x

 

>

 

 

y

 

+ 1/ 2

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2

+ y

2

 

z = x

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

x − y

 

,

 

 

если

 

 

 

x

 

≤

 

y

 

+ 1/ 2

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2)Х2+(У-1)2 ≤ 1,

Варіант 6

 

 

 

Х2

≥ У.

 

cos 5

 

sin1

 

 

1) x =

+

,

y = 2(arctg 135 + ln 3)

4

− 11

3

+

7

 

 

3x2

+ 4y2 ,

если

x ≤ 2 y

z =

3x2

− 4y 2 ,

если

x > 2 y

 

 

 

 

Х ≤ 1,

 

2)

 

 

 

 

 

 

У ≤ 1 .

 

Варіант 7

 

 

 

 

 

 

 

 

 

 

12.483

5.76 sin 4

 

 

3

 

3 3

 

1

1) x =

 

 

,

y = lg

 

3

 

−

 

(1.842)4 3

673.8 cos8

 

4

 

 

 

 

 

 

 

 

x − 2y

2 , если

xy < 0

 

2x

2

+ 5y

z =

 

 

 

 

xy,

если

xy ≥ 0

 

2)У ≤ Х,

У≥ - Х, Х2 +У2 ≤ 1.

 

 

 

 

 

 

 

 

 

 

 

 

 

45

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Варіант 8

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

1 −2.2

 

1)

x = 0.027−1/ 3

−

 

 

 

ln 3,

y = 3sin1+ cos1

 

 

 

 

 

 

 

 

 

 

 

 

 

6

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

tg(x − 2y),

 

если

 

 

x + y

 

> 2

 

 

 

 

 

 

 

 

z =

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

x − 2y

 

,

 

 

 

если

 

 

 

x + y

 

≤ 2

 

 

 

ln

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2)

 

 

 

 

 

 

 

(Х-1) 2 +У2 ≤ 1,

 

 

 

 

 

 

 

 

 

 

 

Варіант 9

 

 

 

 

 

 

 

 

 

 

У ≤ Х.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

1)

x =

25 + 7 136 ,

 

 

 

y = arctg(cos 53 + cos 56 ) ln 5

 

 

 

 

0.00034

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

− x

+ e

− y

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

e

 

 

 

 

 

 

,

если

 

 

 

2

 

 

x

 

 

 

< y

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

+ 2

 

 

 

 

 

 

 

 

 

 

 

 

 

 

z =

3

x

y

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

+ y,

 

 

 

 

 

 

если

 

 

 

2

 

x

 

≥ y

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

x

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2)У ≤ Х,

У≤ - Х, Х2 +У2 ≤ 2.5.

Варіант 10

1)

x =

 

2.5913

0.0836 ,

 

 

 

1.147(e2

+ e−2 )

 

 

3x − 5y

,

если

 

 

 

 

 

 

 

 

 

 

2

+ y

2

 

z =

x

 

 

 

 

 

 

3x + 5y

 

 

 

 

 

,

если

 

 

 

 

2

− y

2

 

 

x

 

 

 

 

2)

 

 

 

 

 

 

 

(Х+1 ) 2

 

 

 

 

 

 

 

 

У ≤

Варіант 11

y= 3 − lg 0.8 tg4 x < 1 + y

x ≥ 1+ y

+У2 ≤ 2,

Х2.

1) x = 5 7.0023 0.1 − 1+ 0.1(e2 + e−2 ), y = ln 3(cos 35 + cos 65 )

46

 

 

2

 

+ 7 y

2

),

если

x

2

+ y

2

> 0.1

arctg(5x

 

z =

5x

 

+ 7 y 2 ,

если

x2

+ y2

≤ 0.1

arctg

2

 

 

 

 

 

 

 

 

 

 

 

 

 

2)У ≥ Х2,

У ≤ 1/(1+ Х2).

Варіант 12

 

 

 

 

 

 

 

y = (1+ 5 lg 20)3 / 0.2

1)

x = 10 10 + 10 10 tg1,

 

 

 

z = sin(3x + e y ),

если

 

 

x + y < 5

 

sin(3x + y),

если

 

 

x + y ≥ 5

2)

 

 

 

У ≤ Х,

 

 

 

 

 

 

 

 

 

У ≥ - Х,

 

 

 

 

Варіант 13

 

 

 

У ≤ 2.

 

 

 

 

 

 

 

 

 

 

 

 

 

y = sin(0.5arctg(− 43 )ln 5)

1)

x = 3

4.2

0.1 + 3(e2 + e−2 ),

 

 

3x − 5y ,

если

 

 

x < 2y

 

z =

3x + 5y ,

если

 

 

 

x ≥ 2y

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2)

 

Х2 +(У-1)2 ≤ 1.5,

 

 

 

Х+У ≤ 2.

Варіант 14

 

 

 

 

 

 

 

y = sin(1+ 3 lg3)4

1)

x = 4 − 0.01862

tg2,

 

 

 

 

0.1 − 10

 

 

 

 

 

 

 

 

 

x + y ,

если

x2

+ y 2

> 10

 

z =

 

 

 

 

 

 

 

 

 

 

 

 

 

если

x

 

+ y

 

≤ 10

 

x + y,

2

2

 

 

 

 

 

 

 

 

 

 

2)

 

 

 

У ≥ Х2/3 ,

 

 

 

 

 

 

 

 

(Х-1) 2

+У2

≤ 1.2.

47

Варіант 15

 

 

 

 

 

y = (ln 3)sin[12 arctg(−

 

 

 

)]

1) x = 3.78(e4 − e3 ) ,

2

 

2

 

3

 

3

 

4 + 5

3

 

 

 

 

 

 

 

 

 

 

 

x − 2y

 

, если

 

x − 2y

 

 

≤ 1

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2

+ 2y

2

 

 

 

 

 

 

x

 

 

 

 

 

 

 

 

 

 

 

 

 

z =

 

2

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

,

 

если

 

x − 2y

 

 

> 1

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

− 2y

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

x

 

 

 

 

 

 

 

 

 

 

 

 

2)У3 ≥ Х2/2 ,

У ≤ 2 - Х2 .

Варіант 16

 

 

 

 

 

 

 

 

1) x =

 

(ln 5)

5 − 3 5 lg5

 

= e

−2 ctg(12 cos

74 )

1

− 0.1845(sin1+

,

y

 

2cos1)

 

 

 

 

z =

 

xy ,

если

xy < −0.1

 

 

 

 

x + y ,

если

xy ≥ −0.1

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2)

 

 

У ≤ ln(Х),

 

 

 

 

 

 

 

 

Х ≤ e ,

 

 

 

 

 

 

 

 

У ≥ - 1.

 

 

 

 

Варіант 17

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

x =

12.4e + 0.6e−1 3

0.058

 

 

 

 

 

 

y = tg(5arctg

3

−

1

 

1)

 

 

 

 

 

 

,

 

 

 

)

 

 

 

 

 

 

3

4

 

 

 

0.389(ln 3 + sin1)

 

 

 

 

 

 

3x + y

если

 

 

 

 

 

<

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

,

 

 

x

y

 

 

 

 

 

 

 

2

+ y

2

 

 

 

 

 

 

z = x

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

xy,

 

 

 

если

 

 

x

 

 

≥

 

 

y

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2)

 

У ≤ 1/Х2,

2Х+3У ≤ 6.

 

 

 

 

 

48

Варіант 18

1)

x =

1.5922

 

 

 

 

 

 

 

 

 

4

0.0896

cos 3, y = e2 sin(3arctg 3)

3

0.382

 

sin 3 +

0.5382

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

x

 

+ 5

 

y

 

),

если

 

x

2

+ y

2

> 1

 

 

 

 

 

 

 

 

 

ln(

 

 

 

 

 

 

 

 

z =

 

 

 

y

 

,

 

 

 

 

 

 

 

если

 

x2

+ y2

≤ 1

 

 

x −

 

 

 

 

 

 

 

2)

 

 

 

 

 

 

 

 

 

 

 

 

 

Х2

≤ У ,

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Х ≥ 0 ,

 

 

 

 

 

 

 

Варіант 19

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

У ≤ 1.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

1)

x =

 

79.8ln 3 −

 

 

156.3 ln 5,

 

 

y = tg4 cos(3sin 3)

 

 

 

xe

2

 

− ye

− 2

,

если

x ≤ y

 

 

 

z =

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

x − y,

 

 

 

 

если

x > y

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2

≤ У ≤ √

 

2

 

 

2)

 

 

 

 

 

 

- √1+Х

1+Х

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

1 ≤ Х ≤

1 .

 

 

 

 

Варіант 20

1

 

0.207

 

35

 

y = (lg 2)e−4arctg (3+ 2 2 )

1) x =

 

 

sin 4 −

 

cos 4,

 

 

3

 

 

 

49

 

 

 

3 xy ,

если

x ≤ y

 

z =

 

 

 

 

 

 

 

 

 

если

x > y

 

x + y,

 

2)-√1+ У2 ≤ Х ≤ √1+ У2 ,

-1 ≤ У ≤ 1.

Варіант 21

1) x = 0.1711.16\lg 5+ 2.56 lg 7 ,

y = tg6 e− arctg 3

49

ln(

 

x

 

+

 

y

 

),

если

 

 

 

 

 

x ≤ y + 1

 

 

 

 

 

 

 

 

z =

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

x − y

 

),

если

 

 

 

 

 

x > y + 1

 

 

ln(

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

У ≤ 2ех,

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2)

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

У ≥ 1 ,

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Варіант 22

 

 

 

 

 

 

 

 

 

 

 

 

Х ≤ 1 .

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2

ln 2 + sin(arctg

 

)

1) x = 2.560.76 sin 2 − (3e)−1 sin 2.3, y =

1

 

7

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

3

 

 

 

x − y

 

 

, если

 

 

x

 

+

 

y

 

> 1

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2

+

4y

2

 

 

z = 3x

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

x2

 

− y 2 ,

 

 

если

 

x

 

+

 

 

 

y

 

≤ 1

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2)Х2 +(У-1)2 ≤ 1 ,

У ≤ 1/(1+ Х2) .

Варіант 23

 

 

 

 

 

 

 

 

 

 

 

 

1) x = lg3.3 − 2(6

0.6 )3.3 e−2 , y = (tg4)cos(arctg

4

)

5

 

 

2xe

3

− 3ye

2

,

если

xy > 5

 

 

 

 

z =

 

 

 

 

 

 

 

 

 

 

 

 

 

2x + 3y ,

 

 

если

xy ≤ 5

 

 

 

 

2)

 

 

 

 

 

 

 

 

У ≥ 2х,

 

 

 

 

 

 

 

 

 

 

 

 

У ≤ 2+Х/3 ,

Варіант 24

 

 

 

 

 

 

 

 

Х ≥ 0.

 

 

 

 

 

 

 

 

 

 

 

 

y = (tg4) 990.5−lg 4

1) x = 0.460.46 sin 3 − 0.350.35 cos3,

 

xe + ye

−1

,

если

 

x < 10y

 

 

 

z =

 

 

 

 

 

 

 

 

 

 

 

 

 

x + y ,

 

 

 

если

 

x ≥ 10y

 

 

 

 

 

50

2)У ≥ Х2/2 ,

У ≤ 1- Х2 .

Варіант 25

 

 

 

 

 

 

 

 

 

 

y = arctg((sin1)ln 3)

1) x = (0.273ln 3)1.57 ln 2 ,

 

 

7x − 5y

 

,

если

x >

 

y

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2x

2

+

3y

2

z =

 

 

 

 

 

 

 

 

 

 

 

 

 

 

x − y

 

,

 

 

 

если

x ≤

 

y

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

2)Х2+(У-2)2 ≤ 1 ,

Х2+(У-1)2 ≤ 1 .

Варіант 26

3 123.4

2 ln 2

y = arctg[− 14 (arctg2 + arctg3)]

1) x =

 

,

1.124 5

0.024 cos1

 

−

 

x+ y

 

,

если

y > −2x

 

 

e

 

 

 

z =

 

если

y ≤ −2x

xy,

 

2)У ≤ 2/(1+ Х2) ,

У≥ 1.

Варіант 27

1) x = 3

0.8cos 7 + 4 2.3 sin 7,

y = cos −

1

(arctg3 − arctg2)

 

 

 

 

 

 

 

 

 

 

 

 

 

2

 

ln 3 ln(

 

 

 

 

 

 

 

),

 

 

 

 

x

 

+

 

y

 

если

max(x, y) > 10

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

z =

x+ y

 

 

 

 

 

 

 

 

 

 

max(x, y) ≤ 10

 

,

 

 

 

 

 

 

 

 

если

e

 

 

 

 

 

 

 

 

 

2)У ≤ 1- Х/2,

 

Х2 +У2 ≤ 3.

Варіант 28

1)

x = 810.25 cos 5 − 2−0.36 sin 5, y = sin((3tg4)arctg

3

)

2