## Код:
```
PROCEDURE P1;
VAR a: INTEGER;
BEGIN   a := a + 3;
END P1;

PROCEDURE P2;
VAR a: INTEGER;
BEGIN   INC(a, 3);
END P2;
```


Код для процедур и правда одинаковый получается.

## Код:
```
PROCEDURE P1
00000001H:   55    push  ebp
00000002H:   8B EC    mov  ebp, esp
00000004H:   83 C4 FC    add  esp, -4
00000007H:   83 45 FC 03    add  -4[ebp], 3
0000000BH:   8B E5    mov  esp, ebp
0000000DH:   5D    pop  ebp
0000000EH:   C3    ret
```


## Код:
```
PROCEDURE P2
0000000FH:   55    push  ebp
00000010H:   8B EC    mov  ebp, esp
00000012H:   83 C4 FC    add  esp, -4
00000015H:   83 45 FC 03    add  -4[ebp], 3
00000019H:   8B E5    mov  esp, ebp
0000001BH:   5D    pop  ebp
0000001CH:   C3    ret
```
