
02-02-11, 11:46
|
 | Διαχειριστής Όνομα: Τάσος Φιλοξενιδης Έκδοση λογισμικού Office: Ms-Office 365 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική, Γερμανική | | Εγγραφή: 21-10-2009
Μηνύματα: 2.030
| |
Καλημέρα Γιώργο μου!
Σε 3 κελιά ορίζω τα ονόματα: - Ακτίνα κυλίνδρου (Rk) = "R_Cyl" (m)
- Μήκος κυλίνδρου (L) = "L_Cyl" (m)
- Ύψος περιεχόμενου υγρού (H) = "H_Cyl" (m)
Με τον παρακάτω τύπο νομίζω ότι φτάνω σε σωστό αποτέλεσμα: Κώδικας: =IF(H_Cyl=2*R_Cyl;PI()*R_Cyl^2*L_Cyl;IF(AND(H_Cyl<2*R_Cyl;H_Cyl>R_Cyl);PI()*R_Cyl^2*L_Cyl-(2*R_Cyl-H_Cyl)/(
12*SQRT(R_Cyl^2-(R_Cyl-(2*R_Cyl-H_Cyl))^2))*(3*(2*R_Cyl-H_Cyl)^2+4*(2*SQRT(R_Cyl^2-(R_Cyl-(2*R_Cyl-H_Cyl)
)^2))^2)*L_Cyl;IF(AND(H_Cyl<=R_Cyl;H_Cyl>0);H_Cyl/(12*SQRT(R_Cyl^2-(R_Cyl-H_Cyl)^2))*(3*H_Cyl^2+4*(2*
SQRT(R_Cyl^2-(R_Cyl-H_Cyl)^2))^2)*L_Cyl;"Έχουμε υπερχείλιση!")))
Τώρα όποιος θέλει μπορεί να προσθέσει και το Μήκος πλευρικού σφαιρικού τμήματος (P).
Δες το αν θέλεις κι εσύ γιατί λόγω φόρτου εργασίας δεν μπόρεσα να το τεστάρω αρκετά.
Τα λέμε..
Τάσος
__________________ Ms-Office Development Team Ανάπτυξη επαγγελματικών εφαρμογών |