Реферат: Взаимодействие основных частей ЭВМ при выполнении программы

end; {Move_4_3}

{-------------------}

procedure Move_4_4;

begin

SetColor(Green);

Animation(52, 66, 115, 1, '+', True);

OutTextXY(183, 73, '=c')

end; {Move_4_4}

{-------------------}

procedure Move_4_5;

begin

SetColor(GetBkColor);

SetColor(Green);

Animation(47, 198, 63, 1, '3', False);

end; {Move_4_1}

{-------------------}

procedure Move_4_6;

begin

SetColor(Green);

Animation(191, 66, 94, 2, 'c', True)

end; {Move_4_5}

{-------------------}

procedure Help; {Помощь}

const

XH: Integer = 70;

YH: Integer = 70;

begin

ClearDevice;

SetColor(BRDCol);