program pinumber; const pi = 3.14159;{definiert als EXTENDED} var piSecond : extended; begin WriteLn('Pi ist definiert als ', pi); piSecond := pi; WriteLn(piSecond); end.