Function func32771914() As String
Dim i As Single, S As String
For i = 0.12 To 1.88 Step 0.12
S = S & Cos(i ^ 2) + 5 / i ^ 3 - 2 & ";"
Next
func32771914 = S
End Function
Excel VBA
Int i,k,sum,arif;
i=0;
k=0;
while(i<=1000){
if(k%2==0 && k%3==0){
i++;
sum+=k;
}
k++;
}
arif = sum/i;
std::cout << "Среднее арифметическое = " << arif;
std::cout << endl << "Сумма чисел = " << sum;
В 1 гб. - 1000 мб.
В 1 мб.- 1000 кб.
В 1 б. - 1 бт.
1
2
3
4
5
6
umn_matrix<span>(</span><span>[</span><span>]</span><span>,</span>_<span>,</span><span>[</span><span>]</span><span>)</span><span>.</span>
umn_matrix<span>(</span><span>[</span>Stroka<span>|</span>Tail<span>]</span><span>,</span>Vector<span>,</span><span>[</span>A<span>|</span>ATail<span>]</span><span>)</span><span>:-</span>umn_stroka<span>(</span>Stroka<span>,</span>Vector<span>,</span>A<span>)</span><span>,</span> umn_matrix<span>(</span>Tail<span>,</span>Vector<span>,</span>ATail<span>)</span><span>.</span>
umn_stroka<span>(</span><span>[</span><span>]</span><span>,</span>_<span>,</span><span>0</span><span>)</span><span>.</span>
umn_stroka<span>(</span><span>[</span>E1<span>|</span>Tail<span>]</span><span>,</span><span>[</span>E2<span>|</span>Tail2<span>]</span><span>,</span>Ans<span>)</span><span>:-</span>umn_stroka<span>(</span>Tail<span>,</span>Tail2<span>,</span>TempAns<span>)</span><span>,</span> Ans <span>is</span> TempAns<span>+</span>E1<span>*</span>E2<span>.</span>
1)(2*1024*)/80=25,6
2)25,6*120=3072 Кбайт
Ответ:3072 Кбайта