<span>64 Кбайт/1024 бит в секунду = (64 · 1024 · 8 бит)/(1024 бит в секунду) = 64 · 8 секунд. </span>
Вычислим размер файла:
<span>64 · 8 секунд · 256 бит в секунду = 64 · 256 байт = 16 Кбайт. </span>
Ответ: 16.
Сделать эту задачу можно двумя способами. Первый - чисто арифметический. Второй - более хитрый, через операции над строками. Мы пойдем вторым путем, он короче и практичней, такой код будет требовать меньше ресурсов машины для реализации (что незаметно в таких маленьких задачках, но довольно критично в реальной жизни, поэтому учимся писать дальновидные коды).
<em>Var n:longint;</em>
<em>Function MinDigit(n:longint):integer;</em>
<em>var s,a:string; c,i:integer;</em>
<em>begin</em>
<em> str(n,s);</em>
<em> a:=s[1];</em>
<em> for i:=2 to length(s) do</em>
<em> if s[i]<a then a:=s[i];</em>
<em> val(a,n,c);
</em> MinDigit:=n;
<em>end;</em>
<em>Function MaxDigit(n:longint):integer;</em>
<em>var s,a:string; c,i:integer;</em>
<em>begin</em>
<em> str(n,s);</em>
<em> a:=s[1];</em>
<em> for i:=2 to length(s) do</em>
<em> if s[i]>a then a:=s[i];</em>
<em> val(a,n,c);
</em> MaxDigit:=n;
<em>end;</em>
<em>Begin</em>
<em> readln(n);</em>
<em> writeln(MinDigit(n),' ',MaxDigit(n));</em>
<em>End.
</em>По факту переменную <em>"c"</em> можно убрать из функций и использовать вместо нее уже не нужную в конце <em>"i"</em>, таким образом избавившись от одной переменной. Но это не принципиально на самом деле, к тому же так понятней, какая переменная за что отвечает.
С = x * y - 5 * sqr(x);
алг Пример (рез цел c)
надо | с = x * y - 5 * sqr(x);
нач
цел x, y
ввод x, y
с := x * y - 5 * sqr(x)
вывод "c = ", c
кон
I = M*N*i = 50*40*16 = 32000бит;
32000:5 = 6400бит/сек = 800байт/cек
Атос & (Портос | Арамис) = (Атос & Портос) | (Атос & Арамис)
Формула включений-исключений
P(Атос&Портос | Атос&Арамис) = P(Атос & Арамис) + P(Атос & Портос) - P(Атос & Арамис & Атос & Портос) = 235 + 335 - 120 = 450