<snapdata remixID="10418317"><project name="PACS - Area/Perimeter Program (full code) rev" app="Snap! 6, https://snap.berkeley.edu" version="1"><notes></notes><thumbnail>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAKAAAAB4CAYAAAB1ovlvAAAAAXNSR0IArs4c6QAAFVRJREFUeF7tnQdYFccWx/+X3qwoqBCRYu/d2Lsi9hpLLLErdnmaoonl5WmML+ozioKAiIKKhdi7ERv23itKE8SCAoLg+87gLrsgei/cywKZ831+4mV3ZvZ/f54pe+aM6sOHDx/AjSugkAIqDqBCyvNqmQIcQA6CogpkAjAxMRE7d+5EtWrVYGpqmu3GGRgYQKXh3e9TUpCamorw8HAULVoUVapU0bAEfnl+U0AGYEJCAu7fvw9jY2OoVGn4ZBwiqvO5sbER7s9uiuqWmslhUrIsovr4inVev34d3bp106wQfnW+UkAG4Lp161C3bt0cP4C5mRmKrmgOfU1dIICIEYeQnJwstoF7wRx/HXm6ABmAp0+fZt0ueT3ydAMHDkT79u0RFRWF4OBg7NmzB4MGDUK9evVQqlQp9O7dG7Vq1UJISAiGDBmCcePGoXnz5rAwN0fJ1a1h7hoElYkFUp89QPKxVTAZ4YfkE14wajocSUfdkXRoCSwWPEbCqr5IeXCaCRU6ZK8MQGoL1cGtYCogA5BA0tfXZwDSnydPnrBx2Ny5czF79mwUK1YMd+/exa5du2Bubs4g7NSpE96+fYuKFSsyhc6cOYPChQuj9Jp2MJ+yFwlLOsLkWw8GIJnp2C14M9MORm2nIPXlU5j0WYwPcdF4Oz/N894fsEMEkNrw7t07NG3atGCqz59KPgv29vZGpUqVRA/4448/Mi+4b98+/PDDDyhTpgyGDx+OAQMG4NKlSxg9ejQcHR0ZMO3atcPgwYMZiDSBsPXpCLPvfKBXwh6pkXdEAFWWdjDp+R8kHV2JpIN/wGJhKBL+7IaU0Ivs67jddxuSkpLE8aetrS1SUlIY+OQJrays+NdWgBQQPeDu3btRpEgRvH//nj2edLKh6c9mZmaoGNgbetB8jftaj00igDdu3ICzs7NMboLdycmpAH0F/+xHYQDGxsYiLi6OKXHlyhXmAamLJVN3FixAK1xvVcISFiYGGqirQlxiEqJjYhn8V69eRffu3cX7hf8EHEANJM0HlzIAPTw80LZtW7G5fn5+rHulbvb27dtwcXFBnz594OvrizVr1oCAJU+5bNkyHDlyBJ6enjhx4gSDmNYQGzZsyH6eOHEi+5vGhNOmTWMz7Ojo6BzLYm9vn+MyeAF5QwEG4KJFi9CrVy+xRTTjJVBq1KiBW7duwdraGkuWLMH8+fPZBIR+N2nSJDbrnTFjBgOQxoIE6Nq1a9GzZ0/278qVK4PWFsmb/f333wzioKCgHD+5g4NDjsvgBeQNBRiAv/32mwxAdZr26tUr5tFolkqz5dw0gptbwVCAAbhw4UIZgPQmJC72GRLi36Y/Jc0nsrGwnDOZVChubYOU1FRZMXwSkjNV89LdDMAFCxbIALyydz3aPfGCngp4pzLCSbMmMLcolCvtjo9/i5pvz6NY6ktWn6qEPcK7e4oTIpqMlC9fPlfawivRvQIMwF9//ZW91SCjWey2eSPgavMYx40aoPLw36HS0xPXBoVr1FmaYQCpVOJMWpOfT/otQpfXf7E2hX13QLYsJCx6614eXoOuFRABpImDAAwBONI2Aq9H7WfwKWXvV/VCqdRoBqCwvEMQcwCV+ka0Xy8DkGa30llw0L9HobKjHaoPmav9GjUo8WzgSrg834gnQ/fJ7qLZNbeCoQADcN68ebIu+K9fR6Nujapw6OWm6FOGHtuE+rdWsgAFaZfPI2QU/Vq0WjkDkIINpB5wx3/GoE71KpkAlHaD0lZk9XnG8WLGewSosvqcAGxw2x2PB++RPXTVqlW1KgIvTDkFGIBz5syRAbhzwVjUrlYZ9j2nK9cyAE+CN6PhnVV49O1uWTsoWptbwVCAAfjzzz+LXTA91q6F41CrWiWU6z5N46AEYSIj9YrZ/TnseCAa3l2Nh4N2iWpTWfSGhlvBUEAEUNoF7/5tPGpWrcgAVNKeBgfi6/seeDBwp6wZHEAlvxXt1s0ApGBT6TLMnkWuqFGlAgNQiI4WqpX+W9c/E4CNH3iyIFWpF61Zs6Z2VeClKaYAA/Cnn35iXbDwJe9bPBHVK5eHXbepanXB2ux2pYvVYce3oMnDNbj7TZBsQbt27dqKCcYr1q4CIoBSD8gArFQeZbtN0W5tGpZGADZ95MUAlMYl1qlTR8OS+OV5VQEGIIXbS8eAB/6YjKoVHVG2q7IAhp/YimaPvVmYvtS0sXMvr34h/7R2MQC///57WRd8cMkUVK3gCNsuk8QuWCpMxnGhdHwodMcZr8/O5xEnt6J56Frc6rNV9r3QrjxuBUMBBiAFlQrBCPRYB5d+BLDzJEWfMvzkVrR84oubvbfI2lG/fn1F28Ur154CIoDSLvjQsqmo4uTAPKCSFnFyG1o+9cWNXoGyZjRo0EDJZvG6tagAA9DNzU32LvjI8umo4mSPMi4Ts5wFC11qdheZ1QnNIgBbh/uBdspJ3wU3atRIixLwopRUgAE4ffp0WRdMAFZyLIcynSZ8cRlGl42POLUdbT4CKK2HA6hL1XO3bAYg7VgTumDyNEf/dEMlh3Io3clVbI3UY0mb+LnP6Tp1t3V+KulR1OntaBOxAVe7b5SV07hx49xVidemMwUYgFOnTpXNgo+tmIEKDmVFD5hVEtXsQPmpsrIqhwBsG+mPy139ZQvRTZo00ZkgvODcVYABOGXKFNkYMHjlTFSwL4tSzuO/2AVn9TpOG49BALaLCsClLhtkxfFcMdpQN2+UwQCcPHmybCH6uPv3KF/OFqWc07tgJZobdToIHaI34mLn9bLqmzVrpkRzeJ06UIABSJvMpcswJ1b9ACc7W1h3HPfZKtWZyap7DW1gp73GsusfhaBjzCZccPGTtYNSwHErGAowACdMmCDrgk95/ARHOxtYd/g8gNqWYOXKldi4cSMrlnIRxl09AOeYzTjn7CsbCrRs2VLbVfPyFFJABFDqAQlAh6/KZPKAGUPvV69ejVGjRslCpaTPQXliKL8MRdtIjdYdXV1dYWdnl+mxCcIxY8Yw4J6F/IVOsYEMQKlxABWiRQfVMgDHjx8v84Aha2bDsWxpXIQTRowYgeXLl6NLly6Zqt+0aROeP3/OcgZS/pehQ4eyPH42NjYgr9qhQwfmyX755RcGKaV/Cw0NxVdffQV3d3exzIzdtJ6eHl6/fo3464fg8mIrznTwkXXNrVu31oEUvEglFGAAUpIh6cb0M14/w7p4EcRXdAbl6KPkk4UKFco0IyYAKWtq//79cfjwYdDyCIFG11KETYsWLVhyS4KYkks+fvxY/D0lRBo7dqzsmelego8yahUvXhwXgjwwXP8oQtp7y+pu06aNElrxOnWggDgL7ty5M0u59ubNG1DEsYmJCatO051wutohR2mAL1++DEtLS1kqOR1owovMRQUYgMeOHUN8fDzKlSuXo7NBcqPdL1684EnLc0PoXKqDAUh1UV4/GtwLC8s0nqPJAp3Tce/ePTbOo/x+1G2eP38eFJFy4cIF0HtkgmLz5s2gV2Q0uVi8eDEr7/fff2cJzmkTEV1DnpXGfjNnzmR1Ue5BmvWqu1QjeOSLFy+iR48euSQRr0aXCogA3rx5U+x2qUIChwI/CShKTklh8JTAnCYjdJ7IqlWrWCZUGgfSmI/GbjSuCwgIwKxZs9jkhIyOfqD7KKsqbSinVHA0qdm+fbt4JISmDxgZGYmvv/5a09v49XlQARHABw8eyJpH6TrIUxE8dHoSTVJo8E8JKckTkoekJZhz587BwsKCXUuTkZEjRzIAaa8xpX0LDAxknpGAoTEcZd6nPwQkvVLbsWOHxrIQ3DwoVWPZ8uQNIoAEWU6NMhZQVxsWFpbToj57PwHIg1J1KnGuFS4CSOM8qZmaGOPWpbOZwqly1DLKsCqc3KDOzwAMjYxg4yjPhkUAUvfPLf8rIAJ4584d9jQ0IaCTLsPmNkYtK0P22WWjqnhu4QiCUtcW+c4IJvFR6JhwCKqPtOpPOoinb9PzA8fExPAxoK6/iFwqXwagsIZnaGiIQn+2gKmBCsfqzkO1Rq2YJyxhaYkl00YjMlz9pORmFoUxfuEKcXatSQi/6cr2MPuQALOpB3HvVfqaJI0f+SQklwjRcTUigLQkIvWAhVe0xM5ivdFqUPrGpLXDndHfPErjJtl63cDtJxHsyC3ysLSYrI69fBELp4DuDMA7L9ITlVMXzINS1VEw718jW4YRmksesMjKVogdeQBz5s5ls92yZcvCc2ALDC0pyZwPoNzyk4hcOh6l3TyhX6wU7vWxyfTUVstO4V5MHHttRyFXdJacuvbBozfsJwfgdmyKeAsByINS1VUwb18nA1DoHo0IQPfWeDFyP/QNjVgAAQG4ZlDLTABaNHLB++fhsJkVgKSIh3gyo+MnAbwb/Zq9baE1QwpKUNfifYajqutqBqDQPmEJR90y+HV5VwERQDqdXOoBi61qg9gR+6BnYIinT5+yCBavb1tlCaDt/CAapOHeN5lDrMgDEoAUYPDy5ctMAH4u00LC2hGoNsEDN2PSD7EmD8iDUvMuVJq0TATw2rVrMgCLr26LmO/2MA8omM+Qthha8o0m5bNrrZefwc3wGDa7poAHAlFdS/QdyQC8EZ12hCsZAUiRNtzyvwIigBTPR0beyMjICJYe7fBs6C4YGKUtvdDnVoapePHvb4AP8pOLPieDysAQ5vP3sgVqdd/5SmfKietGovoET1x/9k4GIA9Kzf/w0ROIANIxrdIuuIRne0QN2Sl6QIKisIkh9v5rIFLjX6v99IZGxmi1JIgdWpgdS/IbjeoTPXEtKlEGYKtWrbJTnNr39OvXD0uXLmWnwnPTnQIigBQ6z4hUqUCz4JJrOiBy8A42BhQ+9x/TBd8WfaFxa0qvvoKrD0JFD0izYHWzq77fMJYBeCUiXmwHLUTnRlAqnVdMetDyEXlcOhG+RIkSGj8/vyFrBWQACl0fHVZIAIYPCkLCuyTs37+fpfBdP7IjhpVMA0Ewx/X3kBL3AgbFrKDSN8Td3mUy1VZiyQm2DEPrfzQJofLV7Y6T149BjUlrGIBC+2gMKD3fWFdf8KNHj0B7pjOavr4+KICXAjK45UwBEUCKsROXYYyMYO3tjLCB2xGf+I7BQieo+4/qhGFWcgCNHWqgUNNuKNJ2UJbLMJZ/HMf952+wYsUKtleExpjqWor/WNSY5IVLYemTHwKQtgno2ijyp2/fvizULKNRhLaXlxdsbW113YwCXb4IIAWZCkaAlPLphCcDtqJJ0+bMY9GB0wGjXTIBWOGv50iOfAz9wpZQGZngbk/rTIIV/28wHsS+FT0gzYbVtdSA8ag52QsXn8aJtxCA7du3V7eIbF/XtWtXkLcTNlRRNzxs2LBsl8dvzKyACCDF9QlGwBGAof23QN/ASPSMW1y7Y7BlOgjqClryfyG4GRYtdrumpqaZMq9mufdko6sIoLQLph13ujQKwKXobxoHlixZUpdV/aPLFgE8e/YsE4K+ZBNjY5T27YzH/QLFSQj9rlQRC6TucUdqUvqM9EvqGRaxxKsmA9lbEKmpndho0wTUmuKN86GvZB6wY8fMb1y+1Bb++7yngAjgmTNnZB6wjG9nPOy7iXlAJU21eSID8NzjtAOsyagLdnZ2VrJZvG4tKSACGBISIvOANn5d8aB3APTUBFDdWa0m4VhUpipwImpP8cHZR2nLP3Q/Aeji4qIlCXgxSiogAkibh8Qu2MQEtn5dca+nv2whWp1T0r90jboPK6wT6m+ZjNpTfXDmYazYPgpG4ACqq2Tevk4E8OTJk7IuuOyG7rjbcwP09NMWoqWm9vjt402fyn5Kv1Lnc4OtU1Fnmg9O349hpdE9tBD9qVQheVtq3rpPKSADUOgeKSsCAXinu5/aXXBW8mYHVmkWVcNtBOBaBqB0FkxLJNzyvwIigMePHxefhgC08++BW13Xab0Lzhh69aVXcobbp6LuNF+cuhctGwPShnlu+V8BEcDg4GAZgOUCeuJml7U59oA5lcg4aDrqTvfFiTvpWwFoEkLrc9zyvwIigJQfRjDygPYbe+G6i7dWAfzSTJnevcq6X0NDOF1Yinpu63D8dqTYPgKQp+bI//CxMb2QG4ZetZERAPSmwmFTb1zrRABmnoTo8tGFOL/KlSuDklWa7vgXAzD4VoTYPpoFC6d76rItvGzdKyACePToUZkHdNzcB1ed17AIF4Iy4wv5LF+dpeU6YrNVin6m974U0k8v7YXxXlJSEsuC6u3tzT7LOC6kfDSUP4bKMN3hhnpufjh2M1zmAaUZXXUvE69BVwqIAB45ckTs/sgDOgX2xeUOHrhw6QqLvaOEQPR5RqOEQxQZQtmwTp06xVJmPHv2jCU1oq6c4ucOHDjAcshQThnKP0jBDsnJyWyjEyWt/JQ5ODhg27ZtaBa2HnXcNuDo9acyAKksbvlfARFAynAqdMFmBOCWfjjXdjXzXBRASlmwKMupcI2whkddZWJiIoNuy5YtzFMKYzSCiMK4oqKi4OPjwzLxp6amhfPT3wQiecmMY0O6z9PTk3nJpKUdYO+2XQSQvCV1wRzA/A+fbAy4d+9e1l0SDOS5Kmz9Bp4JjeAyZhasra3h7+/P0qtlNIKSAKQMWRR2//DhQ0RERLBNQ+TtKAiVulz6jGCjRWTamkmJjMgLSqNwqGzyigQr5SZc6+mOkc/d2cb0w1dDxaqjo6NZJi5u+V8B0QPSgN/JyYk9EXW1Fbf1Z6k55kQ3hIlNJWh6OIy9vT2DMSv71PofgU9DAQp99/dehSn1LZByfDUD8NCV9K6aZsuUBo5b/ldABJA8lLAzjoIw6+wdBsOPgcBxqcY4nFweSR8kgaRCriAh25WgRXoOofRMWMzXSsSS3pPh84gUczgb34KTwXPxlmTXgzh785FYAG1Ion0r3PK/AiKA9CiUQJLStFF3amVlxf4obdR9C5m7qOuld8CaZFZQuv28/s8rIAOQi8UVyG0FOIC5rTivT6YAB5ADoagCHEBF5eeVcwA5A4oqwAFUVH5eOQeQM6CoAhxAReXnlXMAOQOKKsABVFR+XjkHkDOgqAIcQEXl55VzADkDiirAAVRUfl45B5AzoKgCHEBF5eeVcwA5A4oqwAFUVH5eOQeQM6CoAhxAReXnlXMAOQOKKsABVFR+XjkHkDOgqAIcQEXl55VzADkDiirAAVRUfl45B5AzoKgCHEBF5eeVcwA5A4oqwAFUVH5eOQeQM6CoAhxAReXnlXMAOQOKKsABVFR+XjkHkDOgqAIcQEXl55VzADkDiirAAVRUfl45B5AzoKgCHEBF5eeV/x+SJqM+KB3khgAAAABJRU5ErkJggg==</thumbnail><stage name="Stage" width="480" height="360" costume="0" color="255,255,255,1" tempo="60" threadsafe="false" penlog="false" volume="100" pan="0" lines="round" ternary="false" hyperops="true" codify="false" inheritance="true" sublistIDs="false" scheduled="false" id="1"><pentrails>data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAeAAAAFoCAYAAACPNyggAAAAAXNSR0IArs4c6QAADoVJREFUeF7t1cEJAAAIxDDdf2m3sJ+4wEEQuuMIECBAgACBd4F9XzRIgAABAgQIjAB7AgIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECAiwHyBAgAABAoGAAAfoJgkQIECAgAD7AQIECBAgEAgIcIBukgABAgQICLAfIECAAAECgYAAB+gmCRAgQICAAPsBAgQIECAQCAhwgG6SAAECBAgIsB8gQIAAAQKBgAAH6CYJECBAgIAA+wECBAgQIBAICHCAbpIAAQIECByxcQFpoRMBzwAAAABJRU5ErkJggg==</pentrails><costumes><list struct="atomic" id="2"></list></costumes><sounds><list struct="atomic" id="3"></list></sounds><variables></variables><blocks></blocks><scripts></scripts><sprites><sprite name="Sprite" idx="1" x="1.047823220761228" y="-1.569569788998901" heading="90" scale="1" volume="100" pan="0" rotation="1" draggable="true" costume="0" color="80,80,80,1" pen="tip" id="8"><costumes><list struct="atomic" id="9"></list></costumes><sounds><list struct="atomic" id="10"></list></sounds><blocks></blocks><variables></variables><scripts><script x="30.000000000000004" y="30.000000000000004"><block s="receiveGo"></block><block s="doSetVar"><l>triangleList</l><block s="reportNewList"><list></list></block></block><block s="doSetVar"><l>rectangleList</l><block s="reportNewList"><list></list></block></block><block s="doSetVar"><l>shapeList</l><block s="reportNewList"><list><l>triangle</l><l>square</l><l>rectangle</l><l>circle</l></list></block></block><block s="doSayFor"><l>Hello!</l><l>2</l></block><block s="doSayFor"><l>This program can calculate the area and perimeter of shapes</l><l>4</l></block><block s="doSayFor"><l>It can compute the following</l><l>3</l></block><block s="doSayFor"><block var="shapeList"/><l>4</l></block><block s="doAsk"><l>What is your first shape?</l></block><block s="doSetVar"><l>choice</l><block s="getLastAnswer"></block></block><custom-block s="calcShape %txt"><block var="choice"/></custom-block></script></scripts></sprite><watcher var="triangleList" style="normal" x="4.681011059594084" y="26.82643371896559" color="243,118,29" extX="112" extY="98"/><watcher var="shapeCalculated" style="normal" x="15.818159042408752" y="15.818159042408794" color="243,118,29" hidden="true"/><watcher var="radius" style="normal" x="39.852972920738694" y="39.85297292073567" color="243,118,29" hidden="true"/><watcher var="squareSide" style="normal" x="34.89340535966926" y="123.54422402487512" color="243,118,29" hidden="true"/><watcher var="circle area" style="normal" x="39.852972920738694" y="123.54422402487512" color="243,118,29" hidden="true"/><watcher var="circleCircumference" style="normal" x="9.358819472581217" y="9.35881947257976" color="243,118,29" hidden="true"/><watcher var="rectangleArea" style="normal" x="10.99392356434032" y="10.99392356434084" color="243,118,29" hidden="true"/><watcher var="rectanglePerim" style="normal" x="18.977606152731596" y="18.97760615273127" color="243,118,29" hidden="true"/><watcher var="squareArea" style="normal" x="11.147684733072992" y="11.147684733072914" color="243,118,29" hidden="true"/><watcher var="squarePerim" style="normal" x="11.147684733072992" y="34.55782490206298" color="243,118,29" hidden="true"/><watcher var="triangleArea" style="normal" x="11.147684733072992" y="57.967965071053044" color="243,118,29" hidden="true"/><watcher var="trianglePerim" style="normal" x="11.147684733072992" y="81.3781052400431" color="243,118,29" hidden="true"/><watcher var="triangleSides" style="normal" x="11.147684733072992" y="104.78824540903312" color="243,118,29" hidden="true"/><watcher var="rectangleList" style="normal" x="6.688610839843932" y="140.59108601760948" color="243,118,29" extX="112" extY="98"/><watcher var="shapeList" style="normal" x="11.147684733072992" y="128.19838557802325" color="243,118,29" hidden="true"/><watcher var="choice" style="normal" x="10" y="10" color="243,118,29"/></sprites></stage><hidden></hidden><headers></headers><code></code><blocks><block-definition s="circleCalculations" type="command" category="operators"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doAsk"><l>What is your radius?</l></block><block s="doSetVar"><l>radius</l><block s="getLastAnswer"></block></block><block s="doSetVar"><l>circle area</l><block s="reportRound"><block s="reportProduct"><l>3.14</l><block s="reportProduct"><block var="radius"/><block var="radius"/></block></block></block></block><block s="doThinkFor"><block s="reportJoinWords"><list><l>Your area is </l><block var="circle area"/><l> square units</l></list></block><l>3</l></block><block s="doSetVar"><l>circleCircumference</l><block s="reportRound"><block s="reportProduct"><l>2</l><block s="reportProduct"><l>3.14</l><block var="radius"/></block></block></block></block><block s="doThinkFor"><block s="reportJoinWords"><list><l>Your circumference is </l><block var="circleCircumference"/><l> units</l></list></block><l>3</l></block></script></block-definition><block-definition s="rectangleCalculations" type="command" category="operators"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doAsk"><l>What is the length?</l></block><block s="doAddToList"><block s="getLastAnswer"></block><block var="rectangleList"/></block><block s="doAsk"><l>What is the width?</l></block><block s="doAddToList"><block s="getLastAnswer"></block><block var="rectangleList"/></block><block s="doSetVar"><l>rectangleArea</l><block s="reportProduct"><block s="reportListItem"><l>1</l><block var="rectangleList"/></block><block s="reportListItem"><l>2</l><block var="rectangleList"/></block></block></block><block s="doThinkFor"><block s="reportJoinWords"><list><l>Your area is </l><block var="rectangleArea"/><l> square units</l></list></block><l>3</l></block><block s="doSetVar"><l>rectanglePerim</l><block s="reportSum"><block s="reportProduct"><l>2</l><block s="reportListItem"><l>1</l><block var="rectangleList"/></block></block><block s="reportProduct"><l>2</l><block s="reportListItem"><l>2</l><block var="rectangleList"/></block></block></block></block><block s="doThinkFor"><block s="reportJoinWords"><list><l>Your perimeter is </l><block var="rectanglePerim"/><l> units</l></list></block><l>3</l></block></script></block-definition><block-definition s="squareCalculations" type="command" category="operators"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doAsk"><l>What is the side length?</l></block><block s="doSetVar"><l>squareSide</l><block s="getLastAnswer"></block></block><block s="doSetVar"><l>squareArea</l><block s="reportProduct"><block var="squareSide"/><block var="squareSide"/></block></block><block s="doThinkFor"><block s="reportJoinWords"><list><l>Your area is </l><block var="squareArea"/><l> square units</l></list></block><l>3</l></block><block s="doSetVar"><l>squarePerim</l><block s="reportProduct"><l>4</l><block var="squareSide"/></block></block><block s="doThinkFor"><block s="reportJoinWords"><list><l>Your perimeter is </l><block var="squarePerim"/><l> units</l></list></block><l>3</l></block></script></block-definition><block-definition s="triangleCalculations" type="command" category="operators"><header></header><code></code><translations></translations><inputs></inputs><script><block s="doAsk"><l>What is the base?</l></block><block s="doAddToList"><block s="getLastAnswer"></block><block var="triangleList"/></block><block s="doAsk"><l>What is the height?</l></block><block s="doAddToList"><block s="getLastAnswer"></block><block var="triangleList"/></block><block s="doSetVar"><l>triangleArea</l><block s="reportProduct"><l>0.5</l><block s="reportProduct"><block s="reportListItem"><l>1</l><block var="triangleList"/></block><block s="reportListItem"><l>2</l><block var="triangleList"/></block></block></block></block><block s="doThinkFor"><block s="reportJoinWords"><list><l>Your area is </l><block var="triangleArea"/><l> square units</l></list></block><l>3</l></block></script></block-definition><block-definition s="calcShape %&apos;shape&apos;" type="command" category="operators"><header></header><code></code><translations></translations><inputs><input type="%txt"></input></inputs><script><block s="doUntil"><block s="reportEquals"><block var="shape"/><l>quit</l></block><script><block s="doIfElse"><block s="reportListContainsItem"><block var="shapeList"/><block var="shape"/></block><script><block s="doSayFor"><l>This Program can compute this</l><l>2</l></block></script><script><block s="doSayFor"><l>This is not a shape computed by this program</l><l>3</l></block><block s="doSayFor"><l>Try again!</l><l>3</l></block></script></block><block s="doIf"><block s="reportEquals"><block var="shape"/><l>circle</l></block><script><custom-block s="circleCalculations"></custom-block></script></block><block s="doIf"><block s="reportEquals"><block var="shape"/><l>rectangle</l></block><script><custom-block s="rectangleCalculations"></custom-block></script></block><block s="doIf"><block s="reportEquals"><block var="shape"/><l>square</l></block><script><custom-block s="squareCalculations"></custom-block></script></block><block s="doIf"><block s="reportEquals"><block var="shape"/><l>triangle</l></block><script><custom-block s="triangleCalculations"></custom-block></script></block><block s="doAsk"><l>What is your next shape?  Enter &apos;quit&apos; to stop.</l></block><block s="doSetVar"><l>shape</l><block s="getLastAnswer"></block></block></script></block></script></block-definition></blocks><variables><variable name="triangleList"><list struct="atomic" id="326"></list></variable><variable name="rectangleList"><list struct="atomic" id="327">10,20</list></variable><variable name="shapeCalculated"><l>circle</l></variable><variable name="radius"><l>10</l></variable><variable name="squareSide"><l>20</l></variable><variable name="circle area"><l>314</l></variable><variable name="circleCircumference"><l>63</l></variable><variable name="rectangleArea"><l>200</l></variable><variable name="rectanglePerim"><l>60</l></variable><variable name="squareArea"><l>400</l></variable><variable name="squarePerim"><l>80</l></variable><variable name="triangleArea"><l>24</l></variable><variable name="trianglePerim"><l>0</l></variable><variable name="triangleSides"><l>0</l></variable><variable name="shapeList"><list struct="atomic" id="328">triangle,square,rectangle,circle</list></variable><variable name="choice"><l>circle</l></variable></variables></project><media name="PACS - Area/Perimeter Program (full code) rev" app="Snap! 6, https://snap.berkeley.edu" version="1"></media></snapdata>