Объяснение:
Вариант 6
const
N = 10;
var
a: array[1..N] of integer;
i, max1, max2: byte;
begin
randomize;
for i:=1 to N do begin
a[i] := random(10);
write(a[i]:3);
end;
writeln;
max1 := 1;
for i:=2 to N do
if a[i] > a[max1] then
max1 := i;
if max1=1 then
max2 := 2
else
max2 := 1;
for i:=2 to N do
if i <> max1 then // чтобы пропустить max1
if a[i] > a[max2] then
max2 := i;
writeln(max1,' ', a[max1]);
writeln(max2,' ', a[max2]);
end.
Вариант 8 не получилось
Если поочередно, то это временное разделение
Var
i:integer;
s:real;
begin
s:=0;
for i:=1 to 10 do s:=s+i/10;
Writeln(s)
end.
<u>Результат</u>
5.5
128=, значит вес одного символа 7 бит.
30*7=210 бит.
Ответ: 210 бит.
1. 415(10)=110011111(2) = 637 (8) =19F(16)
2. 10011(2) =19(10) 314(8)=204(10) A8(16)=168(10)
3. a) 23(16)=100011(2)
б) АС(16)=254(8)
в) 10111101(2)=275(8)
г) 101011101(2)=ВD(16)
д) 101010(8)=1000001000001000(2)
е)23(10)=17(16)