1)1110*101=112110
2)112110+1101=113211
3)113211\%111=1019,9189
4)1019,9189-1011=8,9189
var A:array[1..100000] of integer; i,k,i1,n:int64;
begin
read(n);
randomize;
for i:=1 to n do
A[i]:=random(2);
writeln('Массив до переформировки:');
for i:=1 to n do
write(A[i],' ');
writeln;
for i1:= 1 to n do
for i:=1 to n-1 do
if A[i]>A[i+1] then begin k:=A[i]; A[i]:=A[i+1]; A[i+1]:=k; end;
writeln('Массив после переформировки:');
for i:=1 to n do
write(A[i],' ');
end.
УСЛОВИЯ ПИСАТЬ НЕ СОБИРАЮСЬ, И ТАК МНОГО СПРОСИЛ.
1)16 = 2⁴, значит для 1 пикселя требуется 4 бита. Для всей картинки получим:
800*600*4=1920000 бит = 1920000 байт=1875 Кбайт
2)Ищем площадь поверхности картинки: 50,8*30,48=1548,384 потом переводим в дюймы, полученное количество дюймов умножаем на 100 и на 24. Полученный результат будет ответом
Количество символов в алфавите (=количество различных символов в "ZLXUZX&$NO") = 8. Объем одного символа = log(2)8 = 3 бита. Объем ответного сообщения = (10/2)*3 = 15 бит