Data update
This commit is contained in:
parent
81fd053722
commit
52a6ef48dd
10248 changed files with 63654 additions and 6775 deletions
|
|
@ -1,25 +0,0 @@
|
|||
function AddNumbers(Num1, Num2: integer): Integer;
|
||||
{Add two numbers in assembly language}
|
||||
asm
|
||||
PUSH EBX
|
||||
PUSH EDX
|
||||
MOV ECX,Num1
|
||||
MOV EDX,Num2
|
||||
ADD ECX,EDX
|
||||
MOV Result,ECX
|
||||
POP EDX
|
||||
POP EBX
|
||||
end;
|
||||
|
||||
|
||||
|
||||
procedure TestAssembly(Memo: TMemo);
|
||||
var I,J,K: integer;
|
||||
begin
|
||||
for I:=1 to 5 do
|
||||
for J:=1 to 5 do
|
||||
begin
|
||||
K:=AddNumbers(I,J);
|
||||
Memo.Lines.Add(IntToStr(I)+' + '+IntToStr(J)+' = '+IntToStr(K));
|
||||
end;
|
||||
end;
|
||||
Loading…
Add table
Add a link
Reference in a new issue