вот так:
1101100 = 108 в десятичной системе
1101100 = 6c в шестнадцатеричной системе
1.
const k=15;
var a:array [1..k] of integer;
i:integer;
begin
for i:=1 to k do
a[i]:=random(50);
writeln (a)
end.
2.
const k=15;
var a:array [1..k] of integer;
i:integer;
begin
for i:=1 to k do
begin
a[i]:=i*2;
writeln (a[i])
end
end.
Какой вопрос? Сразу пиши, чтобы понятно было