FALLUNTERSCHEIDUNG: ··················· ÕÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀ>É Ý Ý ÕÀÀÀÀÉ °ÀÀÀÀÀÀÀÀ® ÕÀÀÉ Ý °ÀÀÀÀÀÀÀÀÀ® ÕÀÉ °ÀÀÀÀÀÀÀÀÀ® Ý ÕÀÀÀÉ ÀÀ>³CASE«À>³AUSDRUCK«À>³OF«ÀÛ²À>³KONSTANTE«À²À>³:«À>³ANWEISUNG«À>ÛÀ²À>³END«ÀÀÀ> ÊÀÀÀÀË ­ÀÀÀÀÀÀÀÀ½ ÊÀÀË ÝÝ ­ÀÀÀÀÀÀÀÀÀ½ Ý ÊÀË ­ÀÀÀÀÀÀÀÀÀ½ Ý Ý ÊÀÀÀË ÝÝ Ý Ý Ý ÝÝ ÕÀÉ Ý Ý Ý ÝÊÀ<ÀÀÀÀ³,«<ÀÀÀÀË Ý Ý Ý ÊÀË Ý Ý Ý ÕÀÉ Ý Ý ÊÀÀ<ÀÀÀÀ³;«<À²À<ÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀË Ý ÊÀË Ý Ý Ý ÕÀÀÀÀÉ °ÀÀÀÀÀÀÀÀÀ® Ý ÊÀ>³ELSE«À>³ANWEISUNG«ÀÀÀÀË ÊÀÀÀÀË ­ÀÀÀÀÀÀÀÀÀ½ LAUFANWEISUNG: ·············· ÕÀÀÀÀÀÀÉ ÕÀ>³DOWNTO«À>É Ý ÊÀÀÀÀÀÀË Ý Ý Ý ÕÀÀÀÉ °ÀÀÀÀÀÀÀÀÀÀÀÀÀ® ÕÀÀÉ °ÀÀÀÀÀÀÀÀ®Ý ÕÀÀÉ Ý °ÀÀÀÀÀÀÀÀ® ÀÀÀÀ>³FOR«À>³VARIABLENBEZ.«À>³:=«À>³AUSDRUCK«±À>³TO«ÀÀÀÀÀ>±À>³AUSDRUCK«ÀÉ ÊÀÀÀË ­ÀÀÀÀÀÀÀÀÀÀÀÀÀ½ ÊÀÀË ­ÀÀÀÀÀÀÀÀ½ ÊÀÀË ­ÀÀÀÀÀÀÀÀ½ Ý Ý ÕÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀË Ý Ý ÕÀÀÉ °ÀÀÀÀÀÀÀÀÀ® ÊÀ>³DO«À>³ANWEISUNG«ÀÀÀÀÀÀÀÀÀ> ÊÀÀË ­ÀÀÀÀÀÀÀÀÀ½ ANWEISUNG: ·········· °ÀÀÀÀÀÀÀÀÀÀ® ÕÀÉ ÕÀÀÀÀ>³GANZE ZAHL«À>³:«ÀÉ Ý ­ÀÀÀÀÀÀÀÀÀÀ½ ÊÀË Ý Ý ÕÀ<ÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀË Ý Ý Ý Ý Ý Ý ÕÀÀÀÀÀÉ °ÀÀÀÀÀÀÀÀÀ® ÕÀÀÀÉ ÀÀÀ±À>ÛÀÀÀÀÀÀÀ>³BEGIN«ÀÀ²À>³ANWEISUNG«À²ÀÀÀ>³END«ÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀ>²ÀÀÀÀ> Ý ÊÀÀÀÀÀË Ý ­ÀÀÀÀÀÀÀÀÀ½ Ý ÊÀÀÀË Ý Ý Ý Ý Ý Ý Ý ÕÀÉ Ý Ý Ý ÊÀ<ÀÀÀÀ³;«<ÀÀÀÀË Ý Ý ÊÀË Ý Ý Ý Ý ÕÀÀÀÀÀÉ °ÀÀÀÀÀÀÀÀ® ÕÀÀÉ °ÀÀÀÀÀÀÀÀÀ® Ý «ÀÀÀÀÀÀÀ>³WHILE«ÀÀÀÀ>³AUSDRUCK«ÀÀÀÀÀÀ>³DO«ÀÀÀ>³ANWEISUNG«ÀÀÀÀÀÀ>³ Ý ÊÀÀÀÀÀË ­ÀÀÀÀÀÀÀÀ½ ÊÀÀË ­ÀÀÀÀÀÀÀÀÀ½ Ý Ý Ý Ý ÕÀÀÀÀÀÀÉ °ÀÀÀÀÀÀÀÀÀ® ÕÀÀÀÀÀÉ °ÀÀÀÀÀÀÀÀ® Ý «ÀÀÀÀÀÀÀ>³REPEAT«À²À>³ANWEISUNG«À²ÀÀ>³UNTIL«À>³AUSDRUCK«ÀÀÀÀÀÀÀ>³ Ý ÊÀÀÀÀÀÀË Ý ­ÀÀÀÀÀÀÀÀÀ½ Ý ÊÀÀÀÀÀË ­ÀÀÀÀÀÀÀÀ½ Ý Ý Ý Ý Ý Ý Ý ÕÀÉ Ý Ý Ý ÊÀ<ÀÀÀÀ³;«<ÀÀÀÀË Ý Ý ÊÀË Ý Ý ÕÀÉ Ý Ý ÕÀ<ÀÀÀÀ³,«<ÀÀÀÀÉ Ý Ý Ý ÊÀË Ý Ý Ý Ý Ý Ý Ý ÕÀÀÀÀÉ Ý °ÀÀÀÀÀÀÀÀ® Ý ÕÀÀÉ °ÀÀÀÀÀÀÀÀÀ® Ý «ÀÀÀÀÀÀÀ>³WITH«ÀÀÀ±À>³VARIABLE«ÀÀ±ÀÀÀ>³DO«ÀÀÀ>³ANWEISUNG«ÀÀÀÀÀÀ>³ Ý ÊÀÀÀÀË ­ÀÀÀÀÀÀÀÀ½ ÊÀÀË ­ÀÀÀÀÀÀÀÀÀ½ Ý Ý Ý Ý ÕÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀ>³ Ý Ý Ý Ý Ý Ý Ý ÕÀÀÉ °ÀÀÀÀÀÀÀÀ® ÕÀÀÀÀÉ °ÀÀÀÀÀÀÀÀÀ®Ý ÕÀÀÀÀÉ °ÀÀÀÀÀÀÀÀÀ® Ý «À>³IF«À>³AUSDRUCK«À>³THEN«À>³ANWEISUNG«±À>³ELSE«À>³ANWEISUNG«À>³ Ý ÊÀÀË ­ÀÀÀÀÀÀÀÀ½ ÊÀÀÀÀË ­ÀÀÀÀÀÀÀÀÀ½ ÊÀÀÀÀË ­ÀÀÀÀÀÀÀÀÀ½ Ý Ý Ý Ý ÕÀÀÀÀÉ °ÀÀÀÀÀÀÀÀÀÀ® Ý «ÀÀÀÀÀÀÀ>³GOTO«ÀÀÀÀÀÀÀÀÀÀ>³GANZE ZAHL«ÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀ>³ Ý ÊÀÀÀÀË ­ÀÀÀÀÀÀÀÀÀÀ½ Ý Ý Ý Ý °ÀÀÀÀÀÀÀÀÀÀÀÀÀ® Ý «ÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀ>³LAUFANWEISUNG«ÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀ>³ Ý ­ÀÀÀÀÀÀÀÀÀÀÀÀÀ½ Ý Ý Ý Ý °ÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀ® Ý «ÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀ>³FALLUNTERSCHEIDUNG«ÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀ>³ Ý ­ÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀ½ Ý Ý Ý Ý °ÀÀÀÀÀÀÀÀ® ÕÀÀÉ °ÀÀÀÀÀÀÀÀ® Ý «ÀÀÀÀÀ>³VARIABLE«ÀÀÀÀÀÀ>²ÀÀ>³:=«ÀÀÀ>³AUSDRUCK«ÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀ>³ Ý ­ÀÀÀÀÀÀÀÀ½ Ý ÊÀÀË ­ÀÀÀÀÀÀÀÀ½ Ý Ý Ý Ý Ý °ÀÀÀÀÀÀÀÀÀÀÀÀÀ® Ý Ý «ÀÀÀÀÀ>³FUNKTIONSBEZ.«À>Ë Ý Ý ­ÀÀÀÀÀÀÀÀÀÀÀÀÀ½ Ý Ý ÕÀÉ Ý Ý ÕÀ<ÀÀÀÀ³,«<ÀÀÀÉ Ý Ý Ý ÊÀË Ý Ý Ý Ý Ý Ý Ý °ÀÀÀÀÀÀÀÀÀÀÀÀ® ÕÀÉ Ý °ÀÀÀÀÀÀÀÀ® Ý ÕÀÉ Ý «ÀÀÀÀÀ>³PROZEDURBEZ.«À²ÀÀÀÀ>³(«ÀÀ±À>³AUSDRUCK«À±ÀÀ>³)«ÀÀ>²ÀÀÀÀÀ>³ Ý ­ÀÀÀÀÀÀÀÀÀÀÀÀ½ Ý ÊÀË ­ÀÀÀÀÀÀÀÀ½ ÊÀË Ý Ý Ý Ý Ý Ý Ý Ý Ý Ý Ý ÊÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀ>Ë Ý Ý Ý ÊÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀ>Ë BLOCK: ······ ÕÀÀÀÀÀÉ °ÀÀÀÀÀÀÀÀÀÀ® ÀÀ²À>³LABEL«ÀÀÀ²À>³GANZE ZAHL«À>É Ý ÊÀÀÀÀÀË Ý ­ÀÀÀÀÀÀÀÀÀÀ½ Ý Ý Ý Ý Ý Ý ÕÀÉ Ý Ý ÊÀ<ÀÀÀÀÀ³,«<ÀÀÀÀÀ³ Ý ÊÀË Ý Ý ÕÀÉ Ý «<ÀÀÀÀÀÀÀÀÀ³;«<ÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀË Ý ÊÀË Ý Ý ÕÀÀÀÀÀÉ °ÀÀÀÀÀÀÀÀÀÀ® ÕÀÉ °ÀÀÀÀÀÀÀÀÀ® «À>³CONST«ÀÀÀ²À>³BEZEICHNER«ÀÀÀ>³=«À>³KONSTANTE«À>É Ý ÊÀÀÀÀÀË Ý ­ÀÀÀÀÀÀÀÀÀÀ½ ÊÀË ­ÀÀÀÀÀÀÀÀÀ½ Ý Ý Ý Ý Ý Ý ÕÀÉ Ý Ý ÊÀ<ÀÀÀÀÀ³;«<ÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀ³ Ý ÊÀË Ý Ý ÕÀÉ Ý «<ÀÀÀÀÀÀÀÀÀ³;«<ÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀË Ý ÊÀË Ý Ý ÕÀÀÀÀÉ °ÀÀÀÀÀÀÀÀÀÀ® ÕÀÉ °ÀÀÀ® «À>³TYPE«ÀÀÀÀ²À>³BEZEICHNER«ÀÀÀ>³=«À>³TYP«ÀÀÀÀÀÀÀ>É Ý ÊÀÀÀÀË Ý ­ÀÀÀÀÀÀÀÀÀÀ½ ÊÀË ­ÀÀÀ½ Ý Ý Ý Ý Ý Ý ÕÀÉ Ý Ý ÊÀ<ÀÀÀÀÀ³;«<ÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀ³ Ý ÊÀË Ý Ý ÕÀÉ Ý «<ÀÀÀÀÀÀÀÀÀ³;«<ÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀË Ý ÊÀË Ý Ý ÕÀÀÀÉ °ÀÀÀÀÀÀÀÀÀÀ® ÕÀÉ °ÀÀÀ® ÕÀÉ °ÀÀÀÀÀÀÀÀÀ® ÕÀÉ «À>³VAR«ÀÀÀÀÀ²À>³BEZEICHNER«À²À>³:«À>³TYP«À²À³[«À>³KONSTANTE«À>³]«À>É Ý ÊÀÀÀË Ý ­ÀÀÀÀÀÀÀÀÀÀ½ Ý ÊÀË ­ÀÀÀ½ Ý ÊÀË ­ÀÀÀÀÀÀÀÀÀ½ ÊÀË Ý Ý Ý Ý Ý Ý Ý Ý ÕÀÉ Ý Ý Ý Ý «À<ÀÀÀÀÀ³,«<ÀÀÀÀË Ý Ý Ý Ý ÊÀË Ý Ý Ý Ý Ý Ý Ý Ý ÕÀÉ Ý Ý Ý ÊÀ<ÀÀÀÀÀ³;«<ÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÛ<ÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀË Ý ÊÀË Ý Ý ÕÀÉ Ý «<ÀÀÀÀÀÀÀÀÀ³;«<ÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀË Ý ÊÀË Ý Ý ÕÀÀÀÀÀÀÀÀÉ °ÀÀÀÀÀÀÀÀÀÀ® °ÀÀÀÀÀÀÀÀÀÀÀÀÀÀ® ÕÀÉ °ÀÀÀÀÀÀÀÀÀÀÀÀÀ® ÕÀ>ÛÀ>³FUNCTION«ÀÀ>³BEZEICHNER«²À>³PARAMETERLISTE«À>³:«À>³TYPBEZEICHNER«À>É Ý Ý ÊÀÀÀÀÀÀÀÀË ­ÀÀÀÀÀÀÀÀÀÀ½Ý ­ÀÀÀÀÀÀÀÀÀÀÀÀÀÀ½ ÊÀË ­ÀÀÀÀÀÀÀÀÀÀÀÀÀ½ Ý Ý Ý Ý Ý Ý Ý ÕÀÉ ÕÀÀÀÀÀÀÀÉ ÕÀÉ Ý Ý Ý «<À³;«<ÀÀ³FORWARD«<ÀÀ³;Ý<ÀÀÀ³ Ý Ý Ý ÊÀË ÊÀÀÀÀÀÀÀË ÊÀË Ý Ý Ý Ý Ý Ý Ý Ý ÕÀÀÀÀÀÀÀÀÀÉ °ÀÀÀÀÀÀÀÀÀÀ®Ý °ÀÀÀÀÀÀÀÀÀÀÀÀÀÀ® Ý Ý «À>³PROCEDURE«À>³BEZEICHNER«±À>³PARAMETERLISTE«ÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀ>³ Ý Ý ÊÀÀÀÀÀÀÀÀÀË ­ÀÀÀÀÀÀÀÀÀÀ½ ­ÀÀÀÀÀÀÀÀÀÀÀÀÀÀ½ Ý Ý Ý Ý Ý Ý ÕÀÉ °ÀÀÀÀÀ® ÕÀÉ Ý ÊÀÀÛ<ÀÀÀÀÀÀÀÀÀ³;«<ÀÀ³BLOCK«<ÀÀ³;«<ÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀË Ý ÊÀË ­ÀÀÀÀÀ½ ÊÀË Ý Ý Ý ÕÀÀÀÀÀÉ °ÀÀÀÀÀÀÀÀÀ® ÕÀÀÀÉ ÊÀ>³BEGIN«ÀÀ²À>³ANWEISUNG«À²ÀÀÀ>³END«ÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀÀ> ÊÀÀÀÀÀË Ý ­ÀÀÀÀÀÀÀÀÀ½ Ý ÊÀÀÀË Ý Ý Ý ÕÀÉ Ý ÊÀ<ÀÀÀÀ³;«<ÀÀÀÀË ÊÀË PROGRAMM: ········· ÕÀÀÀÀÀÀÀÉ °ÀÀÀÀÀÀÀÀÀÀ® ÕÀÉ °ÀÀÀÀÀÀÀÀÀÀ® ÕÀÉ ÕÀÉ °ÀÀÀÀÀ® ÕÀÉ ÝPROGRAM«À>³BEZEICHNER«À>³(«À²À>³BEZEICHNER«À²À>³)«À>³;«À>³BLOCK«À>³.Ý ÊÀÀÀÀÀÀÀË ­ÀÀÀÀÀÀÀÀÀÀ½ ÊÀË Ý ­ÀÀÀÀÀÀÀÀÀÀ½ Ý ÊÀË ÊÀË ­ÀÀÀÀÀ½ ÊÀË Ý Ý Ý ÕÀÉ Ý ÊÀ<ÀÀÀÀÀ³,«<ÀÀÀÀË ÊÀË