ПРиКлад виконання контрольної роботи
Завдання
№
1
а)
б)
в)
Завдання
№
2
Завдання
№
3
x0
= 5,5
х
|
1
|
2
|
3
|
4
|
5
|
6
|
у
|
7
|
9
|
12
|
13
|
14
|
17
|
Формули,
які були використовані:
C2:
= $D$2*A2+$E$2
F2:
= СУММКВРАЗН(B2:B7;E2+D2*A2:A7)
D5:
= НАКЛОН(B2:B7;A2:A7)
E5:
= ОТРЕЗОК(B2:B7;A2:A7)
F7:
= ПРЕДСКАЗ(E7;B2:B7;A2:A7)
Завдання
№
4
1)
2)
У2
Х,
Х2
+У2
1.
Код програми:
‘ опис
типу змінних
Dim
x
As
Double
Dim
y As Double
Dim
z As Double
Dim
st As String
‘текст
основної програми
Private
Sub CommandButton1_Click()
Worksheets("Лист1").Activate
‘ обчислення
значень х, y
x
= 86.9 ^ (-0.25) + 2 ^ 0.3
y
= 49 ^ (1 - Log(2)) + 5 ^ (-Log(4))
Range("B28").Value
= CCur(x)
Range("B29").Value
= CCur(y)
‘ обчислення
значення
z
If
Abs(x) < Abs(y) Then
z
= (3 * x + y) / (x ^ 2 + y ^ 2)
Else
z
= x * y
End
If
Range("B30").Value
= CCur(z)
‘ визначення
належності крапки області
If
y
^ 2 <= x
And
x
^ 2 + (y
- 1) ^ 2 <= 1 Then
st
= "Крапка з координатами х=" &
CStr(x)
& " , " & "у= " & CStr(y)
& " належ.
області"
Else
st
= "Крапка з координатами х=" &
CStr(x)
& " , " & "у= " & CStr(y)
& " не належ.
області"
End
If
MsgBox
st
End
Sub
Результат: