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 байт = 8 бит
1 Кб (1 Килобайт) = 210 байт = 2*2*2*2*2*2*2*2*2*2 байт =
= 1024 байт (примерно 1 тысяча байт – 103 байт)
1 Мб (1 Мегабайт) = 220 байт = 1024 килобайт (примерно 1 миллион байт – 106 байт)
1 Гб (1 Гигабайт) = 230 байт = 1024 мегабайт (примерно 1 миллиард байт – 109 байт)
1 кб=1024 б = 2 >13 бит
Var
i,sum:Integer;
Begin
for i:=5 to 101 do
begin
if (i mod 2 <> 0) sum:=sum+i;
end;
Writeln(sum);
end.
1, если цифровая.
()()()()()()()()()()()()()(
var
a: <em>real</em>;
h, m: <em>byte</em>;
begin
readln(a);
a := a * 6;
h := trunc(a / 60);
m := trunc(a - h * 60);
writeln(String.Format('{0}:{1}', h, m));
<span>end.</span>