Нужна в переводе программ с языка pascal в vba 1)в целочисленной последовательности есть нулевые элементы. создать массив из номеров этих элементов. a, b : array [1..1000] of integer; n, m, i : integer; begin read (n); for i : = 1 to n do read (a[i]); m : = 0; for i : = 1 to n do if a[i] = 0 then begin m : = m + 1; b[m] : = i; end; for i : = 1 to m do write (b[i], ' '); end. 2)элементарные операции с матрицами: (a^2+e)*6, а-произвольная матрица, е-единичная матрица

Sub num1()
    s = 0
    n = CInt(InputBox("N ="))
    Range(Cells(1, 1), Cells(2 * (n + 2), n + 2)).Clear
    ReDim A(n - 1)
    ReDim B(n - 1)

    k = 1
    Cells(k, 1).Value = "A"
    Cells(k + 2, 1).Value = "B"
    k = k + 1

    m = -1
    For i = LBound(A, 1) To UBound(A, 1)
        A(i) = Round(Rnd * 10) - 5
        Cells(k, 1 + i).Value = A(i)
        If A(i) = 0 Then
            m = m + 1
            B(m) = i
            Cells(k + 2, m + 1).Value = B(m)
        End If
    Next
End Sub

Sub num2()
    n = 16
    ReDim A(n, n), C(n, n), E(n, n)
    Range(Cells(1, 1), Cells(2 * (n + 2), n + 2)).Clear

    k = 1
    Cells(k, 1).Value = "Init"
    
    k = k + 1
    Cells(k + n + 1, 1).Value = "Result"

    For i = 0 To n
        For j = 0 To n
            A(i, j) = Round(Rnd * 10)
            Cells(k + i, j + 1).Value = A(i, j)

            If i = j Then E(i, j) = 1 Else E(i, j) = 0

            C(i, j) = 0
            For r = 0 To n
                C(i, j) = C(i, j) + A(i, r) * A(r, j)
            Next

            x = 6 * (C(i, j) + E(i, j))
            Cells(k + n + 2 + i, j + 1).Value = x
        Next
    Next
End Sub

1) 64*32/8/1024 = 0,25 кб; 1 / 0,25 = 4 бит пиксель; 2^4 = 16 цветов.
2) 50*80*(ln(16)/ln(2)) = 16000 бит; 16000 / 8 = 2000 байт.
3) 64*64*(ln(256)/ln(2)) = 32768 бит / 8 / 1024 = 4 кбайт минимум.
4) 2048*1536*3 байт пиксель = 9437184 байт / 8 / 1024 = 1152 кбайт.
5) (ln(256)/ln(2)) / (ln(2)/ln(2)) =8 раз меньше стал; (текущий уменьшенный вес файла + 70 байт) * 8 =~ 560 байт если весил 1 байт.
6) (ln(64)/ln(2)) / (ln(8)/ln(2)) = 2 раза.
7) (ln(1024)/ln(2)) / (ln(32)/ln(2)) = 2 раза.
8) 32*64/8 = 256; 512 байт / 256 = 2 бит пикс; 2^2 = 4 цветов.
9) 128*128/8/1024 = 2; 4 кб / 2 = 2 бит пикс; 2^2 = 4 цветов.
10) 1024*768*16 бит пикс = 12582912 бит / 8 / 1024 / 1024 = 1,5 мбайт.
11) 1024*512/8/1024 = 64; 256 кб / 64 = 4 бит пикс; 2^4 = 16 цветов.
12) 32*128*(ln(64)/ln(2)) бит = 24576 бит / 8 / 1024 = 3 кбайта.
13) 2^24 = 16 777 216 цветов; 1240*1024*(ln(16777216)/ln(2)) бит пикс = 30474240 бит / 8 / 1024  = 3720 кбайт для одной страницы требуется.
 

а) Т.к. компьютер офисный, то и наворотов в нем должно быть немного.Можно взять самую дешевую материнскую плату, микропроцессор и т.д. Видеокарту смысла брать нет, т.к. видеокарты, которая находится на материнской плате вполне хватит на документы :

     • микропроцессор Celeron с сокетом 478 — 1630 руб

     • материнская плата с сокетом 478 — 1340 руб.

     • корпус компьютера с блоком питания мощностью 350 В — 1310 руб.

     • модули оперативной памяти объемом 128 Мбайт — 610 руб.

     • жесткий диск объемом 120 Гбайт — 2260 руб.;

     • сетевая карта 10/100 Мбит/с — 100 руб.

     • принтер струйный (цветной) — 2150 руб.;

     • сканер — 2510 руб.;

     • монитор CRT, диагональ 17 дюймов — 3810 руб.;

     • мышь оптическая — 200 руб.;

     • клавиатура — 180 руб.

     Итог : 16100

б) Для игр подойдет более навороченный компьютер:

• микропроцессор Pentium IV с сокетом 775 LGA — 3590 руб.

• материнская плата с сокетом 775 — 3700 руб.;

• корпус компьютера с блоком питания мощностью 400 В — 2480 руб.;

• модули оперативной памяти объемом 512 Мбайт — 1740 руб.;

• жесткий диск объемом 200 Гбайт — 2760 руб.;

• видеокарта с объемом видеопамяти 512 Мбайт — 6420 руб.;

• звуковая карта — 1270 руб.;

• звуковые колонки 5.1 (5 колонок + сабвуфер) — 2920 руб.;

• сетевая карта 10/100/1000 Мбит/с — 570 руб.;

• монитор LCD, диагональ 19 дюймов — 7850 руб.;

• мышь оптическая — 200 руб.;

• клавиатура — 180 руб.

Итог:32680
в) Здесь нам понадобится очень мощьный компьютер, т.к. видеомонтаж "сжирает" практический все ресурсоры компьютера и занимает большое количество места на компьютере:

• микропроцессор Pentium D с сокетом 775 LGA — 6750 руб.;

• материнская плата с сокетом 775 — 3700 руб.;

• корпус компьютера с блоком питания мощностью 400 В — 2480 руб.;

• модули оперативной памяти объемом 512 Мбайт — 1740 руб.;

• жесткий диск объемом 300 Гбайт — 3090 руб.;

• жесткий диск объемом 300 Гбайт — 3090 руб.;

• звуковая карта — 1270 руб.;

• звуковые колонки 5.1 (5 колонок + сабвуфер) — 2920 руб.;

• сетевая карта 10/100/1000 Мбит/с — 570 руб.;

• привод CD-RW/DVD-ROM — 970 руб.;

• монитор LCD, диагональ 19 дюймов — 7850 руб.;

• мышь оптическая — 200 руб.;

• клавиатура — 180 руб.

Итог:34810

г) Учеба информатике претполагает работе с графическими программами, текстовыми и т.д. ( в этом варианте могу ошибаться, т.к. для материнской платы с сокетом S-AM2 нет микропроцессора и я взял ближайший микропроцессор):

• микропроцессор Athlon64 с сокетом 939 — 4470 руб.;

• материнская плата с сокетом S-AM2 — 2320 руб.;

• корпус компьютера с блоком питания мощностью 350 В — 1310 руб.;

• модули оперативной памяти объемом 256 Мбайт — 1050 руб.;

• жесткий диск объемом 120 Гбайт — 2260 руб.;

• видеокарта с объемом видеопамяти 128 Мбайт — 1300 руб.;

• звуковая карта — 1270 руб.;

• звуковые колонки 5 В — 730 руб.;

• сетевая карта 10/100 Мбит/с — 100 руб.;

• привод CD-RW — 830 руб.;

• монитор CRT, диагональ 17 дюймов — 3810 руб.;

• мышь оптическая — 200 руб.;

• клавиатура — 180 руб.

Итог:19830

д) Компьютер будет по мощности похож на б) + дополнительное оборудование

 • микропроцессор Pentium IV с сокетом 775 LGA — 3590 руб.;

• материнская плата с сокетом 775 — 3700 руб.;

• корпус компьютера с блоком питания мощностью 350 В — 1310 руб.;

• жесткий диск объемом 120 Гбайт — 2260 руб.;

• видеокарта с объемом видеопамяти 256 Мбайт — 2760 руб.;

• звуковая карта — 1270 руб.;

• звуковые колонки 5.1 (5 колонок + сабвуфер) — 2920 руб.;

• сетевая карта 10/100/1000 Мбит/с — 570 руб.;

• привод CD-RW/DVD-ROM — 970 руб.;

• фотопринтер струйный — 2500 руб.;

• принтер лазерный — 4630 руб.;

• сканер — 2510 руб.;

• монитор LCD, диагональ 17 дюймов — 6340 руб.;

• мышь оптическая — 200 руб.;

• клавиатура — 180 руб.

Итог:34560

 

P.S. Это исключительно я так себе представляю сборку компьютера по данным характеристикам, но мои варианты могут быть не верны, или не совпадать с вашими, так что заранее говорю, что могут быть ошибки. И удачи вам в учебе)