Function Toplama(a,b:integer):integer; var c:integer; begin asm mov ax,a add ax,b mov c,ax end; Toplama:=c; end;