Μην Βάζεις e αλλά Εχp δηλαδή
(1/600)*Integrate[Exp[-((x/24350)^0.8 + x/600)], {x, 0, Infinity}]

Επανανάρτηση , στο ... ορθό

Στο συνημμένο αρχείο υπάρχει ένα πρόγραμμα όπου στα δύο κουτιά εισαγωγής εισάγουμε τις δύο συναρτήσεις ,
με τους δρομείς , επιλέγουμε τα άκρα ολοκλήρωσης και εμφανίζονται τόσο το γραμμοσκιασμένο εμβαδόν όσο και το πόσο ισούται

Γράφεις Ολοκλήρωμα[χ^2,0,1] Ολοκλήρωμα[χ^3,0,1] και θα εμφανιστεί κάτι σαν το παρακάτω Στην συνέχεια μπορείς να " παίξεις " με τα χρώματα των χωρίων. Θα πρότεινα όμως να κατεβάσεις την τελευταία έκδοση του geogebra που υποστηρίζει την εντολή ΟλοκλήρωμαΜεταξύ απο εδώ http://www.geogebra.org/cms/downl...

Χρησιμοποιείς την εντολή ΟλοκλήρωμαΜεταξύ[χ^2,χ^3,0,1] . Εναλλακτικά και άν δεν έχεις εληνικό geogebra την
IntegralBetween[χ^2, χ^3, 0,1]. Ταυτόχρονα υπολογίζεται και το ζητούμενο εμβαδό

Απλά μετά από αυτό τον διάλογο θεωρώ ότι το «κυνήγι» του βέλτιστου άνω φράγματος έχει μόνο «προσεγγιστικό» αλλά και τεχνικό ενδιαφέρον, αφού βέλτιστο άνω φράγμα (αλλά και κάτω-παρόμοια αντιμετώπιση) δεν υφίσταται. Σωτήρη όντως η περαιτέρω συζήτηση ξεφεύγει από τα σχολικά πλαίσια, αλλά μάλλον υφίστα...

Έπειτα απο πολύ καιρο ασχολήθηκα με την ιστοσελίδα μου και την μετέτρεψα σε blog. Περιέχει άρθρα , σημειώσεις αλλά και προγράμματα για διδασκαλία σε geogebra, CDF, και widgets του Wolphram Alpha. Θα ήταν χαρά μου να την δούν όσα μέλη του Mathematica επιθυμούν και να μου πούν την γνώμη τους και παρατ...

Συγχαρητήρια σε όλους όσους εργάστηκαν. Καλή Αρχή!