global _kula

_kula:
push EBP
mov EBP, ESP
mov EAX,0
finit
push 2

fild dword ptr [EBP-4]
fmul st(0)
fild dword ptr [EBP-4]
fmul st(0),st(0)
fild dword ptr [EBP-4]
fmul st(0),st(0)

fadd st(0),st(4)
fadd st(0),st(3)
push 5
fild dword ptr [EBP-8]
fmul st(0),st(0)
fcomi st,st(2)
jg koniec
mov eax,1
koniec:
	ret