Может из двоичной в восьмиричную? если да, то так:
11011011=333
11000001=301
1101011=153
11010001=321
Пол =”д” И Рост > 178 И Год рождения < 2000.
ОТВЕТ НОМЕР ДВА
Var x: array[1..8] of longint;
Var i,a : longint;
Begin
for i:= 1 to 8 do
begin;
readln(a);
x[i] := a;
end;
Writeln('Массив K:');
for i:= 1 to 8 do
begin;
writeln(',i,' = ',x[i]);
end;
Readln;
end.