TI-Basic: Programme und Tutorials: Rechteckfunktion

Erstellt von: Peter Riedel
Schwierigkeitsgrad: Einsteiger
Modell: Voyage 200

Rechteckfunktion

 Rechteckfunktion 

:rechteck(x)
:Func
:If abs(x)>1/2 Then
:  Return 0
:ElseIf abs(x)<1/2 Then
:  Return 1
:EndIf
:1/2
:EndFunc
Dieser Artikel wurde von Wikibooks herausgegeben. Der Text ist unter Creative Commons Attribution-Share Alike 4.0 verfügbar, sofern nicht anders angegeben. Für die Mediendateien können zusätzliche Bedingungen gelten.