fork download
  1. program kugel;
  2. const pi = 3.1416;
  3. var radius, flache : real;
  4.  
  5. begin
  6. write ('wie gross ist der radius der kuegel in [cm]?'); readln (radius);
  7. flache := radius* radius* radius* pi;
  8.  
  9. writeln ('die flache ist' , flache);
  10. end.
  11.  
Runtime error #stdin #stdout 0.01s 252KB
stdin
Standard input is empty
stdout
wie gross ist der radius der kuegel in [cm]?Runtime error 106 at $080480F1
  $080480F1
  $0805EE41