Просто пишите Writeln(a:10:5) и с помощью форматного вывода получаете число в стандартном виде. Первое число отвечает за кол-во символов для записи переменной, а второе число отвечает за число символом после запятой
Ответ: В двоичной 1011010001, в восьмеричной 1321, в шестнадцатиричной 2D1.
Объяснение:
Const m=5; n=6;
var
a:array[1..m,1..n] of integer;
b:array[1..m] of integer;
i,j,min:integer;
begin
Randomize;
writeln('Исходный массив:');
for i:=1 to m do
begin
for j:=1 to n do
begin
a[i,j]:=random(50);
write(a[i,j]:4);
end;
writeln;
end;
for i:=1 to m do
begin
min:=a[i,1];
for j:=2 to n do
if a[i,j]<min then min:=a[i,j];
b[i]:=min;
end;
writeln('Полученный массив:');
for i:=1 to m do write(b[i]:4);
writeln;
end.
Пример:
Исходный массив:
44 30 35 16 47 3
30 15 23 40 15 46
46 11 2 3 16 40
19 17 8 22 10 25
41 23 9 47 7 36
Полученный массив:
3 15 2 8 7
<span>1010101(2)+10000101(2) = </span>011011010(2)
Ответ:
var j,i,k,n:integer;
m:array[1..1000] of integer;
begin
read(n,k);
//Ввод элементов массива
for i:=1 to n do
read(m[i]);
//Сортировка по возрастанию
for i:=1 to k do
for j:=i to k do
if m[j]<m[i] then swap(m[i],m[j]);
//Сортировка по убыванию
for i:=k+1 to n do
for j:=i to n do
if m[j]>m[i] then swap(m[i],m[j]);
//Вывод элементов массива
for i:=1 to n do
print(m[i]);
end.