piirto1: PolyLine[(1.5513E1,1.2508E-3), (1.5531E1,2.5596E-3), (1.5513E1,1.2508E-3), (NaN,NaN), true]
piirto2: PolyLine[(2.0478E1,1.0028E-1), (2.0504E1,9.9628E-2), (2.0435E1,9.9192E-2), (2.0356E1,9.7665E-2), (2.0269E1,9.5920E-2), (2.0182E1,9.4393E-2), (2.0112E1,9.2866E-2), (2.0025E1,9.1993E-2), (1.9956E1,9.0248E-2), (1.9764E1,8.6758E-2), (1.9598E1,8.3486E-2), (1.9503E1,8.2396E-2), (1.9450E1,8.0650E-2), (1.9241E1,7.7160E-2), (1.9085E1,7.4107E-2), (1.8980E1,7.1925E-2), (1.8910E1,7.0180E-2), (1.8841E1,6.9308E-2), (1.8701E1,6.7126E-2), (1.8579E1,6.4073E-2), (1.8492E1,6.2546E-2), (1.8370E1,5.9928E-2), (1.8283E1,5.7529E-2), (1.8179E1,5.4693E-2), (1.8074E1,5.2730E-2), (1.7952E1,4.9894E-2), (1.7874E1,4.7495E-2), (1.7813E1,4.5313E-2), (1.7700E1,4.2259E-2), (1.7621E1,4.0514E-2), (1.7482E1,3.8333E-2), (1.7360E1,3.5716E-2), (1.7264E1,3.3752E-2), (1.7203E1,3.2225E-2), (1.7116E1,3.0480E-2), (1.7046E1,2.8735E-2), (1.6959E1,2.7208E-2), (1.6863E1,2.5245E-2), (1.6759E1,2.3064E-2), (1.6663E1,2.1755E-2), (1.6489E1,1.8701E-2), (1.6358E1,1.5866E-2), (1.6228E1,1.3902E-2), (1.6158E1,1.2157E-2), (1.6062E1,1.1067E-2), (1.5958E1,8.8854E-3), (1.5853E1,7.1404E-3), (1.5757E1,5.6134E-3), (1.5670E1,4.3047E-3), (1.5600E1,2.9959E-3), (1.5513E1,2.5596E-3), (1.5444E1,1.6871E-3), (1.5374E1,1.2508E-3), (1.4590E1,1.2508E-3), (1.3736E1,1.2508E-3), (1.3493E1,1.2508E-3), (1.3371E1,1.2508E-3), (1.2517E1,8.1456E-4), (1.1750E1,8.1456E-4), (1.1611E1,8.1456E-4), (NaN,NaN), true]
piirto3: PolyLine[(2.5461E1,1.2508E-3), (2.5408E1,2.1233E-3), (2.5295E1,4.3047E-3), (2.5208E1,6.4860E-3), (2.5112E1,7.7948E-3), (2.4999E1,1.0194E-2), (2.4877E1,1.2376E-2), (2.4781E1,1.3902E-2), (2.4694E1,1.5647E-2), (2.4581E1,1.8047E-2), (2.4502E1,1.9138E-2), (2.4049E1,2.7863E-2), (2.3928E1,3.0044E-2), (2.3875E1,3.1789E-2), (2.3806E1,3.2225E-2), (2.3675E1,3.5061E-2), (2.3562E1,3.7461E-2), (2.3422E1,3.9642E-2), (2.3335E1,4.1387E-2), (2.3178E1,4.4877E-2), (2.3056E1,4.7931E-2), (2.2987E1,4.9240E-2), (2.2917E1,5.1421E-2), (2.2813E1,5.3820E-2), (2.2708E1,5.6220E-2), (2.2569E1,5.9274E-2), (2.2499E1,5.9710E-2), (2.2403E1,6.2109E-2), (2.2299E1,6.3854E-2), (2.2220E1,6.5381E-2), (2.2151E1,6.7563E-2), (2.1976E1,7.1489E-2), (2.1828E1,7.4107E-2), (2.1750E1,7.5852E-2), (2.1663E1,7.7379E-2), (2.1541E1,7.9996E-2), (2.1436E1,8.2614E-2), (2.1332E1,8.5231E-2), (2.1219E1,8.7413E-2), (2.1097E1,8.9594E-2), (2.0983E1,9.1993E-2), (2.0870E1,9.3738E-2), (2.0792E1,9.5483E-2), (2.0696E1,9.6792E-2), (2.0574E1,9.8101E-2), (2.0478E1,9.9410E-2), (NaN,NaN), (2.5478E1,2.1233E-3), (2.5548E1,2.1233E-3), (2.6244E1,2.1233E-3), (2.6488E1,1.6871E-3), (2.6697E1,1.2508E-3), (2.6872E1,3.7830E-4), (2.6959E1,-5.7963E-5), (2.7795E1,-5.7963E-5), (2.8596E1,-5.7963E-5), (2.8840E1,-5.7963E-5), (2.9023E1,1.6017E-4), (2.9119E1,8.1456E-4), (2.9189E1,8.1456E-4), (2.9276E1,8.1456E-4), (2.9363E1,1.6871E-3), (2.9467E1,2.1233E-3), (2.9537E1,2.1233E-3), (2.9624E1,2.5596E-3), (3.0251E1,2.5596E-3), (3.0452E1,2.7777E-3), (3.0547E1,2.9959E-3), (3.0617E1,2.9959E-3), (NaN,NaN), true]
f(x) = If[x < 15.50, 0, If[15.50 ≤ x < 20.50, (1 / 25 * x) - 15.50 / 25, If[20.50 ≤ x < 25.50, (-1 / 25 * x) + 25.50 / 25, 0]]]
a = Integral(f, 15.50, 25.50)
piirto4: PolyLine[(1.8914E1,1.2960E-1), (1.8914E1,1.2579E-1), (1.8952E1,1.2199E-1), (1.8952E1,1.1818E-1), (1.8990E1,1.1342E-1), (1.9085E1,1.0629E-1), (1.9123E1,9.9628E-2), (1.9142E1,9.2492E-2), (1.9142E1,8.6783E-2), (1.9104E1,8.2978E-2), (1.9085E1,7.7745E-2), (1.9066E1,7.2511E-2), (1.8990E1,6.7754E-2), (1.8952E1,6.2045E-2), (1.8933E1,5.6812E-2), (1.8914E1,2.7792E-2), (1.8914E1,1.9229E-2), (1.8971E1,1.3996E-2), (1.8990E1,8.7629E-3), (1.9028E1,4.9570E-3), (1.9028E1,1.1511E-3), (1.9066E1,-1.7033E-3), (NaN,NaN), true]
piirto5: PolyLine[(1.5760E1,9.7143E-3), (1.5912E1,8.7629E-3), (1.6026E1,5.9085E-3), (1.6178E1,4.0055E-3), (1.6292E1,1.1511E-3), (1.6406E1,-7.5183E-4), (1.6520E1,-2.6548E-3), (NaN,NaN), (1.6102E1,2.2083E-2), (1.6311E1,1.8753E-2), (1.6482E1,1.5423E-2), (1.6634E1,1.1617E-2), (1.6881E1,7.8114E-3), (1.7090E1,4.9570E-3), (1.7261E1,6.7537E-4), (1.7432E1,-1.7033E-3), (NaN,NaN), (1.6672E1,4.0161E-2), (1.6824E1,3.8258E-2), (1.7128E1,3.3501E-2), (1.7774E1,2.1132E-2), (1.8268E1,1.1617E-2), (1.8496E1,7.8114E-3), (NaN,NaN), (1.7052E1,5.9191E-2), (1.7166E1,5.7288E-2), (1.7451E1,5.2055E-2), (1.7660E1,4.8725E-2), (1.7812E1,4.4919E-2), (1.8002E1,4.2064E-2), (1.8230E1,3.7307E-2), (1.8420E1,3.4453E-2), (1.8458E1,3.8258E-2), (NaN,NaN), (1.7508E1,8.6783E-2), (1.7660E1,8.2026E-2), (1.7907E1,7.4890E-2), (1.8078E1,7.0608E-2), (1.8306E1,6.6327E-2), (1.8496E1,6.2045E-2), (1.8496E1,6.6803E-2), (1.8420E1,7.0608E-2), (NaN,NaN), (1.8040E1,9.6298E-2), (1.8154E1,9.4395E-2), (1.8344E1,8.9638E-2), (1.8572E1,8.3929E-2), (1.8724E1,8.1075E-2), (1.8800E1,7.8220E-2), (1.8876E1,8.2026E-2), (1.8838E1,8.4881E-2), (1.8838E1,8.8686E-2), (NaN,NaN), (1.8610E1,1.0772E-1), (1.8724E1,1.0676E-1), (1.8838E1,1.0391E-1), (1.8952E1,1.0106E-1), (NaN,NaN), (1.3519E1,-8.9239E-2), (1.3443E1,-8.3530E-2), (1.3329E1,-7.7821E-2), (1.3253E1,-7.3064E-2), (1.3063E1,-6.5452E-2), (1.2873E1,-5.4986E-2), (1.2759E1,-4.6422E-2), (1.2645E1,-3.6908E-2), (1.2607E1,-2.7393E-2), (1.2493E1,-1.5024E-2), (1.2379E1,1.9964E-4), (1.2341E1,3.1598E-2), (1.2341E1,4.6822E-2), (1.2379E1,5.1579E-2), (1.2417E1,5.8239E-2), (1.2493E1,6.2997E-2), (1.2588E1,6.8230E-2), (1.2721E1,7.2511E-2), (1.2911E1,7.7269E-2), (1.3063E1,8.0123E-2), (1.3348E1,8.3453E-2), (1.3671E1,8.4881E-2), (1.4317E1,8.4881E-2), (1.4734E1,8.4881E-2), (1.5000E1,8.3929E-2), (1.5380E1,8.2026E-2), (1.5703E1,7.9647E-2), (1.5988E1,7.7269E-2), (1.6273E1,7.5366E-2), (1.6520E1,7.2511E-2), (1.6834E1,7.0846E-2), (1.6672E1,7.7269E-2), (1.6596E1,8.1075E-2), (1.6254E1,9.0589E-2), (1.5912E1,1.0010E-1), (1.5760E1,1.0296E-1), (1.5893E1,9.7250E-2), (1.6121E1,9.1541E-2), (1.6311E1,8.6308E-2), (1.6558E1,7.9172E-2), (1.6672E1,7.3939E-2), (1.6672E1,6.8706E-2), (1.6425E1,6.8230E-2), (1.6026E1,6.6803E-2), (1.5722E1,6.4900E-2), (1.5608E1,6.3948E-2), (NaN,NaN), (1.3861E1,-1.0161E-1), (1.4032E1,-9.8753E-2), (1.4374E1,-9.8278E-2), (1.4431E1,-1.0446E-1), (1.4374E1,-1.0970E-1), (1.4203E1,-1.1636E-1), (1.4051E1,-1.2111E-1), (1.4298E1,-1.2302E-1), (1.4469E1,-1.2444E-1), (1.4734E1,-1.2444E-1), (1.4924E1,-1.2349E-1), (1.4924E1,-1.1969E-1), (NaN,NaN), (1.5190E1,-1.0066E-1), (1.5152E1,-1.0446E-1), (1.5133E1,-1.0970E-1), (1.5342E1,-1.1112E-1), (1.5570E1,-1.0922E-1), (1.5817E1,-1.0684E-1), (1.5931E1,-1.0113E-1), (1.5950E1,-1.0541E-1), (1.5931E1,-1.1350E-1), (1.5912E1,-1.2064E-1), (1.5874E1,-1.2539E-1), (NaN,NaN), (1.6178E1,-1.2635E-1), (1.6178E1,-1.3015E-1), (1.6178E1,-1.3396E-1), (NaN,NaN), (1.6672E1,-1.0541E-1), (1.6691E1,-1.1065E-1), (1.6938E1,-1.1303E-1), (1.7109E1,-1.1731E-1), (1.7109E1,-1.2397E-1), (1.6976E1,-1.2635E-1), (1.6710E1,-1.2587E-1), (1.6520E1,-1.2349E-1), (1.6406E1,-1.2159E-1), (NaN,NaN), (1.6634E1,-1.0161E-1), (1.6786E1,-1.0161E-1), (1.6938E1,-1.0161E-1), (1.7090E1,-9.9705E-2), (1.7242E1,-9.9705E-2), (NaN,NaN), (1.8116E1,-9.8753E-2), (1.7888E1,-1.0066E-1), (1.7660E1,-1.0399E-1), (1.7603E1,-1.0970E-1), (1.7869E1,-1.1065E-1), (1.8021E1,-1.0589E-1), (1.8040E1,-1.0066E-1), (NaN,NaN), (1.8496E1,-1.0066E-1), (1.8458E1,-1.0351E-1), (1.8268E1,-1.0732E-1), (1.7983E1,-1.1398E-1), (1.7774E1,-1.1969E-1), (1.7565E1,-1.2682E-1), (1.7432E1,-1.3253E-1), (1.7394E1,-1.3776E-1), (1.7546E1,-1.3586E-1), (1.7698E1,-1.3301E-1), (NaN,NaN), (1.8496E1,-1.2539E-1), (1.8287E1,-1.2682E-1), (1.8059E1,-1.3110E-1), (1.7964E1,-1.3491E-1), (1.8116E1,-1.3681E-1), (1.8306E1,-1.3681E-1), (1.8458E1,-1.3586E-1), (1.8458E1,-1.3015E-1), (1.8458E1,-1.2444E-1), (1.8610E1,-1.2254E-1), (NaN,NaN), true]
piirto6: PolyLine[(1.8838E1,-2.2636E-2), (1.8914E1,-2.6442E-2), (1.8914E1,-3.6908E-2), (1.8914E1,-4.4519E-2), (1.8876E1,-5.0228E-2), (1.8876E1,-5.4986E-2), (1.8838E1,-5.7840E-2), (1.8914E1,-5.4986E-2), (NaN,NaN), (1.9978E1,-3.5956E-2), (1.9864E1,-3.6908E-2), (1.9636E1,-3.6908E-2), (1.9446E1,-3.5956E-2), (1.9313E1,-3.1199E-2), (1.9161E1,-2.1446E-2), (1.9484E1,-2.0733E-2), (1.9636E1,-2.3587E-2), (1.9826E1,-2.4539E-2), (1.9978E1,-2.7393E-2), (2.0206E1,-3.0247E-2), (2.0396E1,-3.2150E-2), (2.0643E1,-3.6432E-2), (2.0738E1,-4.0714E-2), (2.0738E1,-4.4519E-2), (2.0700E1,-4.9277E-2), (2.0624E1,-5.4510E-2), (2.0510E1,-6.0695E-2), (2.0434E1,-6.3549E-2), (NaN,NaN), true]
f_1(x) = If[x < 15.50, 0, If[15.50 ≤ x < 20.50, (2 / 75 * x) - 31 / 75, If[20.50 ≤ x < 30.50, (-2 / 150 * x) + 61 / 150, 0]]]
b = Integral(f_1, 15.50, 30.50)