x

πίσσας ημερησίως

Ακτίνα βάσης του τσιγάρου 

Συνολικό μήκος τσιγάρου

Μήκος φίλτρου

Περιεκτικότητα σε πίσσα

Αριθμός τσιγάρων ανά ημέρα

ρ = 0.35 (slider from 0.2 to 0.5, step 0.05)
υ_1 = 8.5 (slider from 8 to 12, step 0.1)
Α: (0, 0)
c = Circle(Α, ρ)
Β = Point(Circle[Α, υ_1])
f = Segment(Α, Β)
a, d, b = Cylinder(c, υ_1)
υ_2 = 2.5 (slider from 2 to 4, step 0.1)
e, g, i = Cylinder(c, υ_2)
π_2 = 0.5 (slider from 0 to 1, step 0.01)
h: υ_1 - υ_2
Γ: (0, 0, υ_2)
q = Circle(Γ, ρ, xOyPlane)
j, j_{2}, j_{3} = Cylinder(q, h)
k = Volume(j)
l: (((2 * pi) * ρ) * h)
κείμενο1: "Ο όγκος του καπνού που περιέχεται στο τσιγάρο είναι: V = " + k + " cm³"
κείμενο2: "Το τσιγαρόχαρτο έχει εμβαδόν ίσο με το εμβαδόν της
παράπλευρης επιφάνειας του τσιγάρου,
του οποίου το ύψος είναι " + h + " cm, δηλαδή: " + l + " cm²"
m: (k * π_2)
κείμενο3: "Η πίσσα που περιέχεται στον καπνό του ενός τσιγάρου είναι: " + m + " mg"
n: (l * 0.05)
κείμενο4: "και στο τσιγαρόχαρτο: " + n + " mg"
o: m + n
Τσιγάρα = 20 (slider from 1 to 60, step 1)
p: (o * Τσιγάρα)
κείμενο7: "" + p + " mg"
κείμενο5: "Άρα, η πίσσα του ενός τσιγάρου είναι: " + m + " + " + n + " = " + o + " mg"
κείμενο6: "Αν καπνίζεις " + Τσιγάρα + " τσιγάρα την ημέρα,
τότε εισπνέεις"