Это текстовой файл. Программа Writer из Open/Libre office.
40,64 см = 16 дюйм
I=K*i
где K= Разрешающая способность сканера
i = глубина цвета
I= 600*1200*16*16*3 байта получается 552960000 байта , можно в Мегабайтах сразу перевести , для этого делим на 1024 ( получаются Килобайты , потом еще раз на 1024)
552960000/1024= 540000 Кб
540000 КБ / 1024 = 527,34375 МБ
Во вложении - файл с рабочей книгой MS Excel 2003.
Соответствующие макросы находятся на листах.
Sub abcd()
Dim so As Double, pp As Double, z As Double
so = 0: pp = 1: no = 0: np = 0
For i = 1 To 8
x = Cells(1, i + 1)
For y = -5 To 5 Step 2
z = x * y / (x ^ 2 + y ^ 2)
If z < 0 Then
so = sp + z
no = np + 1
Else
If z > 0 Then
pp = pp * z
np = np + 1
End If
End If
Next y
Next i
Cells(2, 5) = so / no
Cells(3, 5) = pp ^ (1 / np)
End Sub
Sub Ex26()
Dim a As Double, c As Double
For i = 1 To 6
a = Cells(1, i + 1)
c = Application.WorksheetFunction.Max(Abs(a), Abs(Cells(2, i + 1)))
m = 2 * a / (c * Exp(6))
Cells(3, i + 1) = m
Next i
End Sub
Сначала добовляешь х-сы , получаешь 3x=30.66 :(3)
x=30.66/3=10.22 Это а) б аналогично
б) 96.41x-88.24x+1.83x=0.0202
10x=0.0202 :(10) (чтоб избавится от 10)
x=0.00202