Курсовая работа: Робота в захищеному режимі мікропроцесора

19:begin

if (feature shr i) and 1=0 then s:='не ';

s:=s+'поддерживает команду CLFLUSH';

end;

21:begin

if (feature shr i) and 1=0 then s:='не ';

s:=s+'поддерживает запись истории переходов';

end;

end;

writeln(' ',s);

end;

readkey;

clrscr;

writeln('Особенности микропроцессора:');

for i:=22 to 31 do

if i<>30 then begin

s:='';

case i of

22:begin

if (feature shr i) and 1=0 then s:='не ';

s:=s+'поддерживает программный контроль частоты МП';

end;

23:begin

if (feature shr i) and 1=0 then s:='не ';

s:=s+'поддерживает MMX команды';

end;

24:begin

if (feature shr i) and 1=0 then s:='не ';

s:=s+'поддерживает команды FXSAVE и FXRSTOR';