Индекс
============================
Ответ Б
<span>b) Write ('Привет!!!');
</span>
<em>// PascalABC.NET 3.3, сборка 1583 от 25.11.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=Arr(3,9,1,3,5,8,5,3,6,7,6,5,4,6,1,81); a.Println;
a.IndexesOf(t->t=a.Min).Select(t->t+1).Println
end.
<u>Результат</u>
3 9 1 3 5 8 5 3 6 7 6 5 4 6 1 81
3 15
<span>Program al;
var a: array[1..100] of integer;
buf:integer;
i,n,min:integer;
begin
writeln('n=');
readln(n);
writeln('vvedite massiv=');
for i := 1 to n do
readln(a[i]);
min:=a[1];
for i:=1 to n do
if a[i]<min then min :=a[i];
writeln('mn=', min);
readln;
end.</span>
8 байт - 64 бита
1.5 кбайт =
1 <span>536 байтов
512 бит = 64 байта
2 мбита = </span>
<span>65 536 кбайт
4 бита = 0.5 байта
3072 кбайт = 3 мбайта . Как я поняла тут мегабайты , байты , биты и килобайты да ?</span>