(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 11.3' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 21921, 431] NotebookOptionsPosition[ 21073, 409] NotebookOutlinePosition[ 21413, 424] CellTagsIndexPosition[ 21370, 421] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["Bienvenue dans le monde de Mathematica", "Title", CellChangeTimes->{{3.778506834946327*^9, 3.7785068434252987`*^9}},ExpressionUUID->"36aa36b4-e189-4132-a72e-\ 771464dfb76a"], Cell[TextData[{ "Double-clique sur le symbole ", Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztzTELgkAYh/GjGhobW/0WrY2tRluL0iUtF5xB9LXyy9y3qdclRDSP7oSQ 54FXUPD3T/Jrep4ppcqlPNLsvrU2e+xX8nIw5aUw+rQzN11ou8nn8vEot5Zb yL0mVvWsvO5ffd99fHx8fHx8fHx8fHx8fHx8fHx8fHx8fHx8fPxQ3zn3+X/o fs13IySfjdCGNmL0bSNWfRsx69qIXXtjjJobY1VvEE2lN1nIpnk= "], {{0, 92}, {24, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> ColorProfileData[CompressedData[" 1:eJyVVwdYU8kWnltSCAktEAEpoXekSJdeAwgYOjZCEkIoARKCir0sKrh2EQEb uiqi4loAWSt2ZRHs/aGIysq6WLCh8iYFdH3te+f7Zu6fM+ec+c+5cyczJhn5 7EwUACAhw47NmRYoFnNmxGvAH4kiiVAg4vNYoiK+gC/2zECg0kkddkDdiVNQ kItCqzxRkZgdHsRMSU1jkroBAlQBBRABzuFKCgLj4qJl1sPPv8u7m0AWEFxz kMX61/H/Kpo8voQLABIHcQZPws2D+BAAuC63QFwEAKEN6s2mFRXIcD/E2mJI EAAiLsMCBdaV4QwFtpfbJLCDIQ4AgEzlcMQCANRkvJnFXAGMoybj6CTiCUUQ 10Dsx83i8CC+D7F9Xl4+xOqyIlpnfBdH8LeYGSMxORzBCFbkIhdyiFBSkMuZ 8X+W439LXq50eA5T2KhZ4gi2LGdYt105+VEyTIX4qCgjJhZiLYgvCHlyexm+ myWNSFTa93ElwbBmgAEACnickCiIDSBmSHMSA5XYhSOW+0J7NEZYxEpQ4gxx PlsZHy0W5cZEK+MsyeKzhvEmviQ0ftgmUxjGghiuNPRQSVZCsoIneqZYmBQD sRrEHZKc+Cil78OSrOCYYRuxlC3jbA7x20xxGFthg+nmSYbzwhy5HPlccC1g AUVZCREKXyyFL0mJHubA44eEKjhgPL4oUckNg6sriK30LS3IjVPaY5v4ueFs RZ2x/ZLi+GHfq0VwgSnqgD3O5kTGKed6V1AUl6DghqMgGgSDEMAEUtgyQD7I BsL2vqY++EsxEgY4QAwEgA8clJphj2T5iAj28aAE/AkRH0hG/ILko3xQDPVf RrSK3gFkykeL5R454CnEebg+7of74NGwD4DNBffEvYb9mOrDsxJDiSHECGIY 0WaEBxeyzoVNDIT/RhcFn3yYnYyLaDiHb/EITwmdhMeEG4Quwh2QBJ7Ioyit pgoXiH9gzgTjQReMFqbMLuP77HBLyNoND8J9IX/IHWfg+sABHwszCcT9YW5u UPs9Q+kIt2+1/HE+Gevv81Hq1WzV3JQsMkbeTPCI1Y9Rgr+rEQ8+o360xJZg B7Hz2CnsInYUawJM7ATWjLVhx2R4ZCU8ka+E4dnYcm45MI5w2Map3qnX6fMP c3OU88vqJSniTy+SfQzB+QUzxEJBVhEzEO7GfCZLxHW0Z7o4OXsBINvbFVvH G4Z8z0YYl77pCk8C4FUGlYJvOo4ZAEeeAkB/901n9hou95UAHOvgSsXFCp1s OwYE+I+hDr8KPWAEzIA1zMcFuAMfEABCQSSIBQkgFUyBFc8CeZDzNDALzAel oBysBOtAFdgMtoFdYC84AJrAUXAKnAOXQQe4Ae7BddEDXoB+8A4MIghCQmgI HdFDjBELxA5xQTwRPyQUiUbYSCqSjggQESJFZiELkXJkNVKFbEXqkF+RI8gp 5CLSidxBHiG9yGvkE4qhVFQbNUQt0TGoJxqIRqEJ6GRUgBaiJegidDlaidai e9BG9BR6Gb2BdqEv0AEMYKoYAzPBHDBPLBiLxdKwTEyMzcHKsAqsFtuHtcD3 fA3rwvqwjzgRp+NM3AGuzQg8EefihfgcfBlehe/CG/Ez+DX8Ed6PfyXQCAYE O4I3gUVIIQgI0wilhArCDsJhwln43fQQ3hGJRAbRiugBv8tUYjZxJnEZcSOx gXiS2EnsJg6QSCQ9kh3JlxRL4pCKSKWkDaQ9pBOkq6Qe0geyKtmY7EIOI6eR ReQF5ArybvJx8lXyM/KgioaKhYq3SqwKT2WGygqV7SotKldUelQGKZoUK4ov JYGSTZlPqaTso5yl3Ke8UVVVNVX1Up2gKlSdp1qpul/1guoj1Y9ULaotNZg6 iSqlLqfupJ6k3qG+odFolrQAWhqtiLacVkc7TXtI+6BGV3NUY6nx1OaqVas1 ql1Ve6muom6hHqg+Rb1EvUL9oPoV9T4NFQ1LjWANjsYcjWqNIxq3NAY06ZrO mrGaeZrLNHdrXtR8rkXSstQK1eJpLdLapnVaq5uO0c3owXQufSF9O/0svUeb qG2lzdLO1i7X3qvdrt2vo6UzVidJZ7pOtc4xnS4GxrBksBi5jBWMA4ybjE+j DEcFjuKPWjpq36iro97rjtYN0OXrluk26N7Q/aTH1AvVy9Fbpdek90Af17fV n6A/TX+T/ln9vtHao31Gc0eXjT4w+q4BamBrwDaYabDNoM1gwNDIMNywwHCD 4WnDPiOGUYBRttFao+NGvcZ0Yz9jofFa4xPGfzB1mIHMXGYl8wyz38TAJMJE arLVpN1k0NTKNNF0gWmD6QMzipmnWabZWrNWs35zY/Px5rPM683vWqhYeFpk Way3OG/x3tLKMtlysWWT5XMrXSuWVYlVvdV9a5q1v3Whda31dRuijadNjs1G mw5b1NbNNsu22vaKHWrnbie022jXaU+w97IX2dfa33KgOgQ6FDvUOzxyZDhG Oy5wbHJ8OcZ8TNqYVWPOj/nq5OaU67Td6Z6zlnOk8wLnFufXLrYuXJdql+uu NNcw17muza6vxtqN5Y/dNPa2G91tvNtit1a3L+4e7mL3fe69HuYe6R41Hrc8 tT3jPJd5XvAieAV5zfU66vXR2927yPuA918+Dj45Prt9no+zGscft31ct6+p L8d3q2+XH9Mv3W+LX5e/iT/Hv9b/cYBZAC9gR8CzQJvA7MA9gS+DnILEQYeD 3gd7B88OPhmChYSHlIW0h2qFJoZWhT4MMw0ThNWH9Ye7hc8MPxlBiIiKWBVx i2XI4rLqWP2RHpGzI89EUaPio6qiHkfbRoujW8aj4yPHrxl/P8YiRhTTFAti WbFrYh/EWcUVxv02gTghbkL1hKdsZ/Ys9vl4evzU+N3x7xKCElYk3Eu0TpQm tiapJ01Kqkt6nxySvDq5K2VMyuyUy6n6qcLU5jRSWlLajrSBiaET103smeQ2 qXTSzclWk6dPvjhFf0rulGNT1adyph5MJ6Qnp+9O/8yJ5dRyBjJYGTUZ/dxg 7nruC14Aby2vl+/LX81/lumbuTrzucBXsEbQm+WfVZHVJwwWVglfZUdkb85+ nxObszNnKDc5tyGPnJeed0SkJcoRnck3yp+e31lgV1Ba0FXoXbiusF8cJd4h QSSTJc1F2vCY0ya1lv4kfVTsV1xd/GFa0rSD0zWni6a3zbCdsXTGs5Kwkl9m 4jO5M1tnmcyaP+vR7MDZW+cgczLmtM41m7tobs+88Hm75lPm58z/fYHTgtUL 3i5MXtiyyHDRvEXdP4X/VF+qViouvbXYZ/HmJfgS4ZL2pa5LNyz9WsYru1Tu VF5R/nkZd9mln51/rvx5aHnm8vYV7is2rSSuFK28ucp/1a7VmqtLVnevGb+m cS1zbdnat+umrrtYMbZi83rKeun6rsroyuYN5htWbvhclVV1ozqouqHGoGZp zfuNvI1XNwVs2rfZcHP55k9bhFtubw3f2lhrWVuxjbiteNvT7Unbz//i+Uvd Dv0d5Tu+7BTt7NrF3nWmzqOubrfB7hX1aL20vnfPpD0de0P2Nu9z2Le1gdFQ vh/sl+7/49f0X28eiDrQetDz4L5DFodqDtMPlzUijTMa+5uymrqaU5s7j0Qe aW3xaTn8m+NvO4+aHK0+pnNsxXHK8UXHh06UnBg4WXCy75TgVHfr1NZ7p1NO Xz8z4Uz72aizF86FnTt9PvD8iQu+F45e9L545JLnpabL7pcb29zaDv/u9vvh dvf2xiseV5o7vDpaOsd1Hr/qf/XUtZBr566zrl++EXOj82bizdu3Jt3qus27 /fxO7p1Xd4vvDt6bd59wv+yBxoOKhwYPa/9h84+GLveuY49CHrU9jn98r5vb /eKJ5MnnnkVPaU8rnhk/q3vu8vxob1hvxx8T/+h5UfBisK/0T80/a15avzz0 V8Bfbf0p/T2vxK+GXi97o/dm59uxb1sH4gYevst7N/i+7IPeh10fPT+e/5T8 6dngtM+kz5VfbL60fI36en8ob2iogCPmyI8CGGxoZiYAr3cCQEuFZ4cOAChq iruXXBDFfVGOwH/CivuZXNwB2BkAr7HzAIiGZ5RNsFlATIVP2dE7IQCgrq4j TSmSTFcXRSwqvMEQPgwNvTEEgNQCwBfx0NDgxqGhL9sh2TsAnCxU3PlkQoTn +y2OMtTR8xL8KP8ExeR5fg== "], "RGB", "XYZ"], Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->{11.90625, Automatic}, ImageSizeRaw->{24, 92}, PlotRange->{{0, 24}, {0, 92}}]], "Input",ExpressionUUID-> "8cd708f6-e701-4d03-ad9a-3be15195df69"], " ou ", Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJztmq9v20AUx6ttYHD/wv6HgqFJAzdp9KbBA63W1SOd3E6aTM3MzMyCjIxM jExCQkJMTAxMDAxMAgwMDN7s1Ensu2vipGvON91HepVaufHz1+/u3o+8v/6F f7y6uLh4eNv8wFd/Pt3fXxlf3zW/fLt7+Hl7d/P9y93vm9ub+w/Xr5s/fmzs c2NvGgOFQqFQKBQKhUKheDY1rIoc8iyDPM9f1LL1PQooq1r0Qz9NmYJnG4Au L+FSgGHdgjAuRKswoIhcRg+EMRBCXtgwc19ih1CJFqShjGY9vzDMwhhWZ3Ws hiJbgqOj3TsxQxC6suoUjI0myIS4FOkMQOQaW23shbg1lXh65weBxUqYGwPm Ju58MiET4kEJM/L4bnQvEeIBlzICrYsZPxWx0+Rgofb+CPxsSudkCW73vpxI QBA374Ws34sG0RQOgB6RQ8TpUm3ilUAkeL+liWfa5HWJOh8RQmtrz/KAXvfF HHDvmjYnIdbpZ60MusBq2a23vtFnRQ0LGwOdw1rz/CTXpNAFWmkc5pnZ3CsH G9H6YZifkIbIokvLwiaH4yEP2foKO3CsNDLpso4HTMcDmw9mocnoR5zlUa7J pQts99dhPMxg6H0NgYEYbY55Rul0gXapWGw8zKLhRXWyq7u2po2+j4y6tPEQ mmw8uFTRWSUe22fRPBhzKzl1gXUdbjLxoENMpTWxqzPajKnFpNWl/ffUZ+NB 96meUlPraGxv7lA9KLMuLanPxoMRUN2Bpg7TOXlhuicZll2XLODo4qfUfXh7 sPHf6lJnAZvDNfvqcIVU4OvsOnKT/TeUV5es693sP4ezwGA00dz44KfLqguv RqSfoebVBITOAfnIqAuvhmTzfF4NSWA58jGl04XXc0A20N2EpcPWmMf09+XS hZeLYAjz4cGyGsyjHg1b86Nck0kXXu5q0rlKFW97+bt4so6ed8iiS5Vyah0j oPpSvDMZQXDCrEEKXZ7IyxIqlU999kw2gpT/mQeQQZfE1di8jB7YctYPMuha aTwy6NJS13XPnrxocN1zEKpLf66m5kc9MjC7OWyQT2kOW4mdw/bn9nQNLJJm r9r0JTwhc/s2J9nsqdNZSwsLb8+8fb2IF6U5g7c9I2KD6K81JMFuxmKeOKv8 VxSDOlADf5me/fttZZGAZ/ZqKqYfKoZ8Qdc0CIimgXYGI9SsDpv+qF7EuaiL GFyTzeHOZYgYTayK+ebYKOoS8iyFJEnOYmmaQVFOYdUoFAqFQqFQKKbIX9/4 A/I= "], {{0, 62}, {70, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> ColorProfileData[CompressedData[" 1:eJyVVwdYU8kWnltSCAktEAEpoXekSJdeAwgYOjZCEkIoARKCir0sKrh2EQEb uiqi4loAWSt2ZRHs/aGIysq6WLCh8iYFdH3te+f7Zu6fM+ec+c+5cyczJhn5 7EwUACAhw47NmRYoFnNmxGvAH4kiiVAg4vNYoiK+gC/2zECg0kkddkDdiVNQ kItCqzxRkZgdHsRMSU1jkroBAlQBBRABzuFKCgLj4qJl1sPPv8u7m0AWEFxz kMX61/H/Kpo8voQLABIHcQZPws2D+BAAuC63QFwEAKEN6s2mFRXIcD/E2mJI EAAiLsMCBdaV4QwFtpfbJLCDIQ4AgEzlcMQCANRkvJnFXAGMoybj6CTiCUUQ 10Dsx83i8CC+D7F9Xl4+xOqyIlpnfBdH8LeYGSMxORzBCFbkIhdyiFBSkMuZ 8X+W439LXq50eA5T2KhZ4gi2LGdYt105+VEyTIX4qCgjJhZiLYgvCHlyexm+ myWNSFTa93ElwbBmgAEACnickCiIDSBmSHMSA5XYhSOW+0J7NEZYxEpQ4gxx PlsZHy0W5cZEK+MsyeKzhvEmviQ0ftgmUxjGghiuNPRQSVZCsoIneqZYmBQD sRrEHZKc+Cil78OSrOCYYRuxlC3jbA7x20xxGFthg+nmSYbzwhy5HPlccC1g AUVZCREKXyyFL0mJHubA44eEKjhgPL4oUckNg6sriK30LS3IjVPaY5v4ueFs RZ2x/ZLi+GHfq0VwgSnqgD3O5kTGKed6V1AUl6DghqMgGgSDEMAEUtgyQD7I BsL2vqY++EsxEgY4QAwEgA8clJphj2T5iAj28aAE/AkRH0hG/ILko3xQDPVf RrSK3gFkykeL5R454CnEebg+7of74NGwD4DNBffEvYb9mOrDsxJDiSHECGIY 0WaEBxeyzoVNDIT/RhcFn3yYnYyLaDiHb/EITwmdhMeEG4Quwh2QBJ7Ioyit pgoXiH9gzgTjQReMFqbMLuP77HBLyNoND8J9IX/IHWfg+sABHwszCcT9YW5u UPs9Q+kIt2+1/HE+Gevv81Hq1WzV3JQsMkbeTPCI1Y9Rgr+rEQ8+o360xJZg B7Hz2CnsInYUawJM7ATWjLVhx2R4ZCU8ka+E4dnYcm45MI5w2Map3qnX6fMP c3OU88vqJSniTy+SfQzB+QUzxEJBVhEzEO7GfCZLxHW0Z7o4OXsBINvbFVvH G4Z8z0YYl77pCk8C4FUGlYJvOo4ZAEeeAkB/901n9hou95UAHOvgSsXFCp1s OwYE+I+hDr8KPWAEzIA1zMcFuAMfEABCQSSIBQkgFUyBFc8CeZDzNDALzAel oBysBOtAFdgMtoFdYC84AJrAUXAKnAOXQQe4Ae7BddEDXoB+8A4MIghCQmgI HdFDjBELxA5xQTwRPyQUiUbYSCqSjggQESJFZiELkXJkNVKFbEXqkF+RI8gp 5CLSidxBHiG9yGvkE4qhVFQbNUQt0TGoJxqIRqEJ6GRUgBaiJegidDlaidai e9BG9BR6Gb2BdqEv0AEMYKoYAzPBHDBPLBiLxdKwTEyMzcHKsAqsFtuHtcD3 fA3rwvqwjzgRp+NM3AGuzQg8EefihfgcfBlehe/CG/Ez+DX8Ed6PfyXQCAYE O4I3gUVIIQgI0wilhArCDsJhwln43fQQ3hGJRAbRiugBv8tUYjZxJnEZcSOx gXiS2EnsJg6QSCQ9kh3JlxRL4pCKSKWkDaQ9pBOkq6Qe0geyKtmY7EIOI6eR ReQF5ArybvJx8lXyM/KgioaKhYq3SqwKT2WGygqV7SotKldUelQGKZoUK4ov JYGSTZlPqaTso5yl3Ke8UVVVNVX1Up2gKlSdp1qpul/1guoj1Y9ULaotNZg6 iSqlLqfupJ6k3qG+odFolrQAWhqtiLacVkc7TXtI+6BGV3NUY6nx1OaqVas1 ql1Ve6muom6hHqg+Rb1EvUL9oPoV9T4NFQ1LjWANjsYcjWqNIxq3NAY06ZrO mrGaeZrLNHdrXtR8rkXSstQK1eJpLdLapnVaq5uO0c3owXQufSF9O/0svUeb qG2lzdLO1i7X3qvdrt2vo6UzVidJZ7pOtc4xnS4GxrBksBi5jBWMA4ybjE+j DEcFjuKPWjpq36iro97rjtYN0OXrluk26N7Q/aTH1AvVy9Fbpdek90Af17fV n6A/TX+T/ln9vtHao31Gc0eXjT4w+q4BamBrwDaYabDNoM1gwNDIMNywwHCD 4WnDPiOGUYBRttFao+NGvcZ0Yz9jofFa4xPGfzB1mIHMXGYl8wyz38TAJMJE arLVpN1k0NTKNNF0gWmD6QMzipmnWabZWrNWs35zY/Px5rPM683vWqhYeFpk Way3OG/x3tLKMtlysWWT5XMrXSuWVYlVvdV9a5q1v3Whda31dRuijadNjs1G mw5b1NbNNsu22vaKHWrnbie022jXaU+w97IX2dfa33KgOgQ6FDvUOzxyZDhG Oy5wbHJ8OcZ8TNqYVWPOj/nq5OaU67Td6Z6zlnOk8wLnFufXLrYuXJdql+uu NNcw17muza6vxtqN5Y/dNPa2G91tvNtit1a3L+4e7mL3fe69HuYe6R41Hrc8 tT3jPJd5XvAieAV5zfU66vXR2927yPuA918+Dj45Prt9no+zGscft31ct6+p L8d3q2+XH9Mv3W+LX5e/iT/Hv9b/cYBZAC9gR8CzQJvA7MA9gS+DnILEQYeD 3gd7B88OPhmChYSHlIW0h2qFJoZWhT4MMw0ThNWH9Ye7hc8MPxlBiIiKWBVx i2XI4rLqWP2RHpGzI89EUaPio6qiHkfbRoujW8aj4yPHrxl/P8YiRhTTFAti WbFrYh/EWcUVxv02gTghbkL1hKdsZ/Ys9vl4evzU+N3x7xKCElYk3Eu0TpQm tiapJ01Kqkt6nxySvDq5K2VMyuyUy6n6qcLU5jRSWlLajrSBiaET103smeQ2 qXTSzclWk6dPvjhFf0rulGNT1adyph5MJ6Qnp+9O/8yJ5dRyBjJYGTUZ/dxg 7nruC14Aby2vl+/LX81/lumbuTrzucBXsEbQm+WfVZHVJwwWVglfZUdkb85+ nxObszNnKDc5tyGPnJeed0SkJcoRnck3yp+e31lgV1Ba0FXoXbiusF8cJd4h QSSTJc1F2vCY0ya1lv4kfVTsV1xd/GFa0rSD0zWni6a3zbCdsXTGs5Kwkl9m 4jO5M1tnmcyaP+vR7MDZW+cgczLmtM41m7tobs+88Hm75lPm58z/fYHTgtUL 3i5MXtiyyHDRvEXdP4X/VF+qViouvbXYZ/HmJfgS4ZL2pa5LNyz9WsYru1Tu VF5R/nkZd9mln51/rvx5aHnm8vYV7is2rSSuFK28ucp/1a7VmqtLVnevGb+m cS1zbdnat+umrrtYMbZi83rKeun6rsroyuYN5htWbvhclVV1ozqouqHGoGZp zfuNvI1XNwVs2rfZcHP55k9bhFtubw3f2lhrWVuxjbiteNvT7Unbz//i+Uvd Dv0d5Tu+7BTt7NrF3nWmzqOubrfB7hX1aL20vnfPpD0de0P2Nu9z2Le1gdFQ vh/sl+7/49f0X28eiDrQetDz4L5DFodqDtMPlzUijTMa+5uymrqaU5s7j0Qe aW3xaTn8m+NvO4+aHK0+pnNsxXHK8UXHh06UnBg4WXCy75TgVHfr1NZ7p1NO Xz8z4Uz72aizF86FnTt9PvD8iQu+F45e9L545JLnpabL7pcb29zaDv/u9vvh dvf2xiseV5o7vDpaOsd1Hr/qf/XUtZBr566zrl++EXOj82bizdu3Jt3qus27 /fxO7p1Xd4vvDt6bd59wv+yBxoOKhwYPa/9h84+GLveuY49CHrU9jn98r5vb /eKJ5MnnnkVPaU8rnhk/q3vu8vxob1hvxx8T/+h5UfBisK/0T80/a15avzz0 V8Bfbf0p/T2vxK+GXi97o/dm59uxb1sH4gYevst7N/i+7IPeh10fPT+e/5T8 6dngtM+kz5VfbL60fI36en8ob2iogCPmyI8CGGxoZiYAr3cCQEuFZ4cOAChq iruXXBDFfVGOwH/CivuZXNwB2BkAr7HzAIiGZ5RNsFlATIVP2dE7IQCgrq4j TSmSTFcXRSwqvMEQPgwNvTEEgNQCwBfx0NDgxqGhL9sh2TsAnCxU3PlkQoTn +y2OMtTR8xL8KP8ExeR5fg== "], "RGB", "XYZ"], Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->{41.33203125, Automatic}, ImageSizeRaw->{70, 62}, PlotRange->{{0, 70}, {0, 62}}]], "Input",ExpressionUUID-> "fdfe0095-1e0d-420b-b51b-c0fa2415d18d"], "de la section code pour voir le Code. Pour la refermer double-clique sur le \ ", Cell[BoxData[ GraphicsBox[ TagBox[RasterBox[CompressedData[" 1:eJzt0jEKwjAARuGgDo5ewRs4ujq6VjxAi7W4RGgF8Vr2gJrFUepiXwPvgz+Q TG/IuroW51kIoVumoyjvu7YtH4dVuhxjd2lifdrHW93U7baap8eYtklbpL0k jaZ/9j9tqnLvH2L/OHL/P7n3f2M/y36W/Sz7Wfaz7GfZz7KfZT/Lfpb9LPtZ 9rPsZ9nPsp9lP8t+lv0s+1n2s+xn2c+yn2U/y36W/Sz7Wfaz7GfZz7KfZT/L fpb9LPtZ9rPsZ9nPsp9lP8t+lv0s+1n2/9enb2hTlXu/JGka3gpYaI0= "], {{0, 110}, {48, 0}}, {0, 255}, ColorFunction->RGBColor], BoxForm`ImageTag["Byte", ColorSpace -> ColorProfileData[CompressedData[" 1:eJyVVwdYU8kWnltSCAktEAEpoXekSJdeAwgYOjZCEkIoARKCir0sKrh2EQEb uiqi4loAWSt2ZRHs/aGIysq6WLCh8iYFdH3te+f7Zu6fM+ec+c+5cyczJhn5 7EwUACAhw47NmRYoFnNmxGvAH4kiiVAg4vNYoiK+gC/2zECg0kkddkDdiVNQ kItCqzxRkZgdHsRMSU1jkroBAlQBBRABzuFKCgLj4qJl1sPPv8u7m0AWEFxz kMX61/H/Kpo8voQLABIHcQZPws2D+BAAuC63QFwEAKEN6s2mFRXIcD/E2mJI EAAiLsMCBdaV4QwFtpfbJLCDIQ4AgEzlcMQCANRkvJnFXAGMoybj6CTiCUUQ 10Dsx83i8CC+D7F9Xl4+xOqyIlpnfBdH8LeYGSMxORzBCFbkIhdyiFBSkMuZ 8X+W439LXq50eA5T2KhZ4gi2LGdYt105+VEyTIX4qCgjJhZiLYgvCHlyexm+ myWNSFTa93ElwbBmgAEACnickCiIDSBmSHMSA5XYhSOW+0J7NEZYxEpQ4gxx PlsZHy0W5cZEK+MsyeKzhvEmviQ0ftgmUxjGghiuNPRQSVZCsoIneqZYmBQD sRrEHZKc+Cil78OSrOCYYRuxlC3jbA7x20xxGFthg+nmSYbzwhy5HPlccC1g AUVZCREKXyyFL0mJHubA44eEKjhgPL4oUckNg6sriK30LS3IjVPaY5v4ueFs RZ2x/ZLi+GHfq0VwgSnqgD3O5kTGKed6V1AUl6DghqMgGgSDEMAEUtgyQD7I BsL2vqY++EsxEgY4QAwEgA8clJphj2T5iAj28aAE/AkRH0hG/ILko3xQDPVf RrSK3gFkykeL5R454CnEebg+7of74NGwD4DNBffEvYb9mOrDsxJDiSHECGIY 0WaEBxeyzoVNDIT/RhcFn3yYnYyLaDiHb/EITwmdhMeEG4Quwh2QBJ7Ioyit pgoXiH9gzgTjQReMFqbMLuP77HBLyNoND8J9IX/IHWfg+sABHwszCcT9YW5u UPs9Q+kIt2+1/HE+Gevv81Hq1WzV3JQsMkbeTPCI1Y9Rgr+rEQ8+o360xJZg B7Hz2CnsInYUawJM7ATWjLVhx2R4ZCU8ka+E4dnYcm45MI5w2Map3qnX6fMP c3OU88vqJSniTy+SfQzB+QUzxEJBVhEzEO7GfCZLxHW0Z7o4OXsBINvbFVvH G4Z8z0YYl77pCk8C4FUGlYJvOo4ZAEeeAkB/901n9hou95UAHOvgSsXFCp1s OwYE+I+hDr8KPWAEzIA1zMcFuAMfEABCQSSIBQkgFUyBFc8CeZDzNDALzAel oBysBOtAFdgMtoFdYC84AJrAUXAKnAOXQQe4Ae7BddEDXoB+8A4MIghCQmgI HdFDjBELxA5xQTwRPyQUiUbYSCqSjggQESJFZiELkXJkNVKFbEXqkF+RI8gp 5CLSidxBHiG9yGvkE4qhVFQbNUQt0TGoJxqIRqEJ6GRUgBaiJegidDlaidai e9BG9BR6Gb2BdqEv0AEMYKoYAzPBHDBPLBiLxdKwTEyMzcHKsAqsFtuHtcD3 fA3rwvqwjzgRp+NM3AGuzQg8EefihfgcfBlehe/CG/Ez+DX8Ed6PfyXQCAYE O4I3gUVIIQgI0wilhArCDsJhwln43fQQ3hGJRAbRiugBv8tUYjZxJnEZcSOx gXiS2EnsJg6QSCQ9kh3JlxRL4pCKSKWkDaQ9pBOkq6Qe0geyKtmY7EIOI6eR ReQF5ArybvJx8lXyM/KgioaKhYq3SqwKT2WGygqV7SotKldUelQGKZoUK4ov JYGSTZlPqaTso5yl3Ke8UVVVNVX1Up2gKlSdp1qpul/1guoj1Y9ULaotNZg6 iSqlLqfupJ6k3qG+odFolrQAWhqtiLacVkc7TXtI+6BGV3NUY6nx1OaqVas1 ql1Ve6muom6hHqg+Rb1EvUL9oPoV9T4NFQ1LjWANjsYcjWqNIxq3NAY06ZrO mrGaeZrLNHdrXtR8rkXSstQK1eJpLdLapnVaq5uO0c3owXQufSF9O/0svUeb qG2lzdLO1i7X3qvdrt2vo6UzVidJZ7pOtc4xnS4GxrBksBi5jBWMA4ybjE+j DEcFjuKPWjpq36iro97rjtYN0OXrluk26N7Q/aTH1AvVy9Fbpdek90Af17fV n6A/TX+T/ln9vtHao31Gc0eXjT4w+q4BamBrwDaYabDNoM1gwNDIMNywwHCD 4WnDPiOGUYBRttFao+NGvcZ0Yz9jofFa4xPGfzB1mIHMXGYl8wyz38TAJMJE arLVpN1k0NTKNNF0gWmD6QMzipmnWabZWrNWs35zY/Px5rPM683vWqhYeFpk Way3OG/x3tLKMtlysWWT5XMrXSuWVYlVvdV9a5q1v3Whda31dRuijadNjs1G mw5b1NbNNsu22vaKHWrnbie022jXaU+w97IX2dfa33KgOgQ6FDvUOzxyZDhG Oy5wbHJ8OcZ8TNqYVWPOj/nq5OaU67Td6Z6zlnOk8wLnFufXLrYuXJdql+uu NNcw17muza6vxtqN5Y/dNPa2G91tvNtit1a3L+4e7mL3fe69HuYe6R41Hrc8 tT3jPJd5XvAieAV5zfU66vXR2927yPuA918+Dj45Prt9no+zGscft31ct6+p L8d3q2+XH9Mv3W+LX5e/iT/Hv9b/cYBZAC9gR8CzQJvA7MA9gS+DnILEQYeD 3gd7B88OPhmChYSHlIW0h2qFJoZWhT4MMw0ThNWH9Ye7hc8MPxlBiIiKWBVx i2XI4rLqWP2RHpGzI89EUaPio6qiHkfbRoujW8aj4yPHrxl/P8YiRhTTFAti WbFrYh/EWcUVxv02gTghbkL1hKdsZ/Ys9vl4evzU+N3x7xKCElYk3Eu0TpQm tiapJ01Kqkt6nxySvDq5K2VMyuyUy6n6qcLU5jRSWlLajrSBiaET103smeQ2 qXTSzclWk6dPvjhFf0rulGNT1adyph5MJ6Qnp+9O/8yJ5dRyBjJYGTUZ/dxg 7nruC14Aby2vl+/LX81/lumbuTrzucBXsEbQm+WfVZHVJwwWVglfZUdkb85+ nxObszNnKDc5tyGPnJeed0SkJcoRnck3yp+e31lgV1Ba0FXoXbiusF8cJd4h QSSTJc1F2vCY0ya1lv4kfVTsV1xd/GFa0rSD0zWni6a3zbCdsXTGs5Kwkl9m 4jO5M1tnmcyaP+vR7MDZW+cgczLmtM41m7tobs+88Hm75lPm58z/fYHTgtUL 3i5MXtiyyHDRvEXdP4X/VF+qViouvbXYZ/HmJfgS4ZL2pa5LNyz9WsYru1Tu VF5R/nkZd9mln51/rvx5aHnm8vYV7is2rSSuFK28ucp/1a7VmqtLVnevGb+m cS1zbdnat+umrrtYMbZi83rKeun6rsroyuYN5htWbvhclVV1ozqouqHGoGZp zfuNvI1XNwVs2rfZcHP55k9bhFtubw3f2lhrWVuxjbiteNvT7Unbz//i+Uvd Dv0d5Tu+7BTt7NrF3nWmzqOubrfB7hX1aL20vnfPpD0de0P2Nu9z2Le1gdFQ vh/sl+7/49f0X28eiDrQetDz4L5DFodqDtMPlzUijTMa+5uymrqaU5s7j0Qe aW3xaTn8m+NvO4+aHK0+pnNsxXHK8UXHh06UnBg4WXCy75TgVHfr1NZ7p1NO Xz8z4Uz72aizF86FnTt9PvD8iQu+F45e9L545JLnpabL7pcb29zaDv/u9vvh dvf2xiseV5o7vDpaOsd1Hr/qf/XUtZBr566zrl++EXOj82bizdu3Jt3qus27 /fxO7p1Xd4vvDt6bd59wv+yBxoOKhwYPa/9h84+GLveuY49CHrU9jn98r5vb /eKJ5MnnnkVPaU8rnhk/q3vu8vxob1hvxx8T/+h5UfBisK/0T80/a15avzz0 V8Bfbf0p/T2vxK+GXi97o/dm59uxb1sH4gYevst7N/i+7IPeh10fPT+e/5T8 6dngtM+kz5VfbL60fI36en8ob2iogCPmyI8CGGxoZiYAr3cCQEuFZ4cOAChq iruXXBDFfVGOwH/CivuZXNwB2BkAr7HzAIiGZ5RNsFlATIVP2dE7IQCgrq4j TSmSTFcXRSwqvMEQPgwNvTEEgNQCwBfx0NDgxqGhL9sh2TsAnCxU3PlkQoTn +y2OMtTR8xL8KP8ExeR5fg== "], "RGB", "XYZ"], Interleaving -> True], Selectable->False], DefaultBaseStyle->"ImageGraphics", ImageSize->{17.9921875, Automatic}, ImageSizeRaw->{48, 110}, PlotRange->{{0, 48}, {0, 110}}]], "Input",ExpressionUUID-> "6534994b-b6da-4e5c-af58-2ce5db4d6912"], " correspondant (celui le plus a l\[CloseCurlyQuote]ext\[EAcute]rieur)" }], "Subchapter", CellChangeTimes->{{3.766978538176601*^9, 3.766978558034358*^9}, { 3.7669786648423843`*^9, 3.7669786781853123`*^9}, {3.766978718565464*^9, 3.766978798885715*^9}, {3.766985235643299*^9, 3.766985246774538*^9}, { 3.766985542653933*^9, 3.7669855857225523`*^9}, {3.766986041719223*^9, 3.766986056203774*^9}, {3.778506695873371*^9, 3.778506731912072*^9}, { 3.7785068529136744`*^9, 3.778506871194088*^9}, {3.7785076334638567`*^9, 3.7785076430945253`*^9}},ExpressionUUID->"f32aa0df-4148-4491-b0e4-\ 8798041f094e"], Cell["\<\ Maintenant pour savoir ce que fais le code \[EAcute]value le notebook. Pour \ \[EAcute]valuer toutes les cellules du notebook utilise \[CloverLeaf]+A et \[ShiftKey]+\[ReturnIndicator] (sur Mac) (le + veut \ dire qu\[CloseCurlyQuote]il faut appuyer sur les deux touches en m\[EHat]me \ temps) Ctrl+A et \[ShiftKey]+\[ReturnIndicator] (sur Windows) Une fen\[EHat]tre avec la d\[EAcute]monstration va s\[CloseCurlyQuote]ouvrir. Pour fermer la fen\[EHat]tre de visualisation utiliser \[CloverLeaf]+W (Mac) Pour fermer la fen\[EHat]tre de visualisation utiliser Alt+F4 (Windows)\ \>", "Subchapter", CellChangeTimes->{ 3.778506830451187*^9, {3.778506878659524*^9, 3.7785069262009487`*^9}, { 3.778507546678411*^9, 3.778507557937777*^9}, {3.778507636725843*^9, 3.778507646771227*^9}, 3.778780388692498*^9},ExpressionUUID->"e4e79792-6816-4bc2-a6db-\ 5bb69c99e61c"], Cell[CellGroupData[{ Cell["Code", "Chapter", CellChangeTimes->{{3.766753610932144*^9, 3.766753662060808*^9}, { 3.7667537390612164`*^9, 3.766753743453858*^9}, {3.766753797812129*^9, 3.766753806594549*^9}, {3.766754526507348*^9, 3.76675453120152*^9}, { 3.766754622018692*^9, 3.766754626962552*^9}, 3.7670630795422564`*^9},ExpressionUUID->"04d1fdc4-835e-4d90-a7ad-\ fbb56a88dbd4"], Cell[BoxData[ RowBox[{ RowBox[{ RowBox[{"visualisation1", "=", RowBox[{"Manipulate", "[", RowBox[{ RowBox[{"Graphics", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{"Style", "[", RowBox[{ RowBox[{"Text", "[", RowBox[{ "\"\\"", ",", RowBox[{"{", RowBox[{"1", ",", "0"}], "}"}]}], "]"}], ",", "Black", ",", "16"}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"Style", "[", RowBox[{ RowBox[{"Text", "[", RowBox[{"\"\\"", ",", "p"}], "]"}], ",", "Red", ",", "44"}], "]"}]}], "}"}], ",", RowBox[{"PlotRange", "\[Rule]", "4"}], ",", RowBox[{"ImageSize", "\[Rule]", "Full"}]}], "]"}], ",", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"p", ",", RowBox[{"{", RowBox[{"1", ",", "1"}], "}"}]}], "}"}], ",", "Locator"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]"}]], "Input", CellChangeTimes->{{3.778507390300743*^9, 3.778507417915409*^9}, { 3.778507449423448*^9, 3.7785076721499166`*^9}, 3.778780362358028*^9},ExpressionUUID->"ef069f09-c980-4cfd-a237-\ 89bd2d1e87dd"], Cell[BoxData[ RowBox[{ RowBox[{"CreateDocument", "[", "\[IndentingNewLine]", RowBox[{"visualisation1", "\[IndentingNewLine]", ",", RowBox[{"WindowSize", "\[Rule]", "Full"}]}], "\[IndentingNewLine]", RowBox[{"(*", RowBox[{"Commenter", " ", RowBox[{"(*", RowBox[{",", RowBox[{"WindowSize", "\[Rule]", "Full"}]}], "*)"}], " ", "pour", " ", "faire", " ", "appara\[IHat]tre", " ", "la", " ", "fen\[EHat]tre", " ", "dans", " ", "le", " ", "m\[EHat]me", " ", "bureau"}], "*)"}], "]"}], ";"}]], "Input", CellChangeTimes->{{3.764938240390666*^9, 3.7649382887808847`*^9}, { 3.76621271837566*^9, 3.766212727684372*^9}, {3.7667516916227016`*^9, 3.766751752253604*^9}, {3.778506546808717*^9, 3.778506589406959*^9}}, CellLabel->"In[33]:=",ExpressionUUID->"bd959455-224d-4438-b5ea-45a9ef9da71c"] }, Closed]] }, Open ]] }, WindowSize->{840, 1001}, WindowMargins->{{497, Automatic}, {Automatic, 114}}, FrontEndVersion->"12.0 for Mac OS X x86 (64-bit) (April 8, 2019)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[580, 22, 183, 3, 160, "Title",ExpressionUUID->"36aa36b4-e189-4132-a72e-771464dfb76a"], Cell[766, 27, 16777, 294, 161, "Subchapter",ExpressionUUID->"f32aa0df-4148-4491-b0e4-8798041f094e"], Cell[17546, 323, 886, 16, 307, "Subchapter",ExpressionUUID->"e4e79792-6816-4bc2-a6db-5bb69c99e61c"], Cell[CellGroupData[{ Cell[18457, 343, 371, 6, 58, "Chapter",ExpressionUUID->"04d1fdc4-835e-4d90-a7ad-fbb56a88dbd4"], Cell[18831, 351, 1367, 36, 157, "Input",ExpressionUUID->"ef069f09-c980-4cfd-a237-89bd2d1e87dd"], Cell[20201, 389, 844, 16, 115, "Input",ExpressionUUID->"bd959455-224d-4438-b5ea-45a9ef9da71c"] }, Closed]] }, Open ]] } ] *)