diff --git a/courses/fundamentals_of_ada/273_subprogram_contracts.rst b/courses/fundamentals_of_ada/273_subprogram_contracts.rst
index 7117eb2cf..e42084a36 100644
--- a/courses/fundamentals_of_ada/273_subprogram_contracts.rst
+++ b/courses/fundamentals_of_ada/273_subprogram_contracts.rst
@@ -528,35 +528,48 @@ Quiz
 
 .. code:: Ada
 
-   type Index_T is range 1 .. 100;
-   -- Database initialized such that value for element at I = I
-   Database : array (Index_T) of Integer;
-   -- Set the value for element Index to Value and
-   -- then increment Index by 1
-   function Set_And_Move (Value :        Integer;
+   Database : String (1 .. 10) := "ABCDEFGHIJ";
+   -- Set the value for the element at position Index in
+   -- array Database to Value and then increment Index by 1
+   function Set_And_Move (Value :        Character;
                           Index : in out Index_T)
                           return Boolean
       with Post => ...
 
 Given the following expressions, what is their value if they are evaluated in the postcondition
-of the call :ada:`Set_And_Move (-1, 10)`
+of the call :ada:`Set_And_Move ('X', 4)`?
 
-.. list-table::
+.. container:: animate 2-
+
+   .. image:: subprogram_contracts_special_attributes-legend.svg
+      :width: 60%
+
+.. container:: animate 1-
+
+   * ``Database'Old (Index)``
+
+.. container:: animate 2-
+
+   .. image:: subprogram_contracts_special_attributes-answer1.svg
+      :width: 60%
+
+.. container:: animate 1-
+
+   * ``Database (Index'Old)``
 
-   * - ``Database'Old (Index)``
+.. container:: animate 3-
 
-     - :animate:`11`
-     - :animate:`Use new index in copy of original Database`
+   .. image:: subprogram_contracts_special_attributes-answer2.svg
+      :width: 60%
 
-   * - ``Database (Index'Old)``
+.. container:: animate 1-
 
-     - :animate:`-1`
-     - :animate:`Use copy of original index in current Database`
+   * ``Database (Index)'Old``
 
-   * - ``Database (Index)'Old``
+.. container:: animate 4-
 
-     - :animate:`10`
-     - :animate:`Evaluation of Database (Index) before call`
+   .. image:: subprogram_contracts_special_attributes-answer3.svg
+      :width: 60%
 
 -------------------------------------
 Stack Example (Spec with Contracts)
diff --git a/images/subprogram_contracts_special_attributes-answer1.svg b/images/subprogram_contracts_special_attributes-answer1.svg
new file mode 100644
index 000000000..fdeb1ffb7
--- /dev/null
+++ b/images/subprogram_contracts_special_attributes-answer1.svg
@@ -0,0 +1,99 @@
+<?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!-- Created with Inkscape (http://www.inkscape.org/) -->
+
+<svg
+   width="187.51132mm"
+   height="42.68269mm"
+   viewBox="0 0 187.51132 42.68269"
+   version="1.1"
+   id="svg1"
+   inkscape:version="1.3.2 (091e20e, 2023-11-25, custom)"
+   sodipodi:docname="subprogram_contracts_special_attributes-answer1.svg"
+   xmlns:inkscape="http://www.inkscape.org/namespaces/inkscape"
+   xmlns:sodipodi="http://sodipodi.sourceforge.net/DTD/sodipodi-0.dtd"
+   xmlns="http://www.w3.org/2000/svg"
+   xmlns:svg="http://www.w3.org/2000/svg">
+  <sodipodi:namedview
+     id="namedview1"
+     pagecolor="#ffffff"
+     bordercolor="#000000"
+     borderopacity="0.25"
+     inkscape:showpageshadow="2"
+     inkscape:pageopacity="0.0"
+     inkscape:pagecheckerboard="0"
+     inkscape:deskcolor="#d1d1d1"
+     inkscape:document-units="mm"
+     showgrid="false"
+     inkscape:zoom="1.0449705"
+     inkscape:cx="392.83406"
+     inkscape:cy="554.56111"
+     inkscape:window-width="2560"
+     inkscape:window-height="1369"
+     inkscape:window-x="-8"
+     inkscape:window-y="-8"
+     inkscape:window-maximized="1"
+     inkscape:current-layer="layer1" />
+  <defs
+     id="defs1">
+    <rect
+       x="18.182331"
+       y="22.010189"
+       width="739.73376"
+       height="243.06905"
+       id="rect2" />
+    <rect
+       x="38.278591"
+       y="51.676098"
+       width="497.62167"
+       height="295.70212"
+       id="rect1" />
+    <rect
+       x="18.182331"
+       y="22.010189"
+       width="739.73376"
+       height="243.06905"
+       id="rect2-3" />
+    <rect
+       x="18.182331"
+       y="22.010189"
+       width="739.73376"
+       height="243.06905"
+       id="rect2-0" />
+  </defs>
+  <g
+     inkscape:label="Layer 1"
+     inkscape:groupmode="layer"
+     id="layer1"
+     transform="translate(-0.6867882,-1.6995759)">
+    <text
+       xml:space="preserve"
+       transform="matrix(0.26458333,0,0,0.26458333,21.062436,1.5556235)"
+       id="text1"
+       style="font-style:normal;font-variant:normal;font-weight:normal;font-stretch:normal;font-size:24px;font-family:'Courier New';-inkscape-font-specification:'Courier New';text-align:start;white-space:pre;shape-inside:url(#rect2);display:inline;fill:#000000;stroke:none;stroke-width:2.46425"><tspan
+         x="18.181641"
+         y="43.364427"
+         id="tspan12"><tspan
+   style="fill:#e07c00;stroke:none"
+   id="tspan10">Database'Old</tspan> (<tspan
+   style="fill:#00aad4;stroke:none"
+   id="tspan11">Index</tspan>)
+</tspan><tspan
+         x="18.181641"
+         y="73.364427"
+         id="tspan15"><tspan
+   style="fill:#e07c00;stroke:none"
+   id="tspan13">Database before the call</tspan><tspan
+   style="stroke:none"
+   id="tspan14">: ABCDEFGHIJ</tspan>
+</tspan><tspan
+         x="18.181641"
+         y="103.36443"
+         id="tspan17"><tspan
+   style="fill:#00aad4;stroke:none"
+   id="tspan16">Index after the call</tspan>    : 5
+</tspan><tspan
+         x="18.181641"
+         y="133.36443"
+         id="tspan18">Value                   : E</tspan></text>
+  </g>
+</svg>
diff --git a/images/subprogram_contracts_special_attributes-answer2.svg b/images/subprogram_contracts_special_attributes-answer2.svg
new file mode 100644
index 000000000..db3a3ebb3
--- /dev/null
+++ b/images/subprogram_contracts_special_attributes-answer2.svg
@@ -0,0 +1,97 @@
+<?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!-- Created with Inkscape (http://www.inkscape.org/) -->
+
+<svg
+   width="187.51132mm"
+   height="42.68269mm"
+   viewBox="0 0 187.51132 42.68269"
+   version="1.1"
+   id="svg1"
+   inkscape:version="1.3.2 (091e20e, 2023-11-25, custom)"
+   sodipodi:docname="subprogram_contracts_special_attributes-answer2.svg"
+   xmlns:inkscape="http://www.inkscape.org/namespaces/inkscape"
+   xmlns:sodipodi="http://sodipodi.sourceforge.net/DTD/sodipodi-0.dtd"
+   xmlns="http://www.w3.org/2000/svg"
+   xmlns:svg="http://www.w3.org/2000/svg">
+  <sodipodi:namedview
+     id="namedview1"
+     pagecolor="#ffffff"
+     bordercolor="#000000"
+     borderopacity="0.25"
+     inkscape:showpageshadow="2"
+     inkscape:pageopacity="0.0"
+     inkscape:pagecheckerboard="0"
+     inkscape:deskcolor="#d1d1d1"
+     inkscape:document-units="mm"
+     showgrid="false"
+     inkscape:zoom="1.0449705"
+     inkscape:cx="394.74799"
+     inkscape:cy="11.005095"
+     inkscape:window-width="2560"
+     inkscape:window-height="1369"
+     inkscape:window-x="-8"
+     inkscape:window-y="-8"
+     inkscape:window-maximized="1"
+     inkscape:current-layer="layer1" />
+  <defs
+     id="defs1">
+    <rect
+       x="18.182331"
+       y="22.010189"
+       width="739.73376"
+       height="243.06905"
+       id="rect2" />
+    <rect
+       x="38.278591"
+       y="51.676098"
+       width="497.62167"
+       height="295.70212"
+       id="rect1" />
+    <rect
+       x="18.182331"
+       y="22.010189"
+       width="739.73376"
+       height="243.06905"
+       id="rect2-3" />
+    <rect
+       x="18.182331"
+       y="22.010189"
+       width="739.73376"
+       height="243.06905"
+       id="rect2-0" />
+  </defs>
+  <g
+     inkscape:label="Layer 1"
+     inkscape:groupmode="layer"
+     id="layer1"
+     transform="translate(-0.40242404,-53.688248)">
+    <text
+       xml:space="preserve"
+       transform="matrix(0.26458333,0,0,0.26458333,20.778072,53.544296)"
+       id="text1-8"
+       style="font-style:normal;font-variant:normal;font-weight:normal;font-stretch:normal;font-size:24px;font-family:'Courier New';-inkscape-font-specification:'Courier New';text-align:start;white-space:pre;shape-inside:url(#rect2-3);display:inline;fill:#000000;stroke:none;stroke-width:2.46425"><tspan
+         x="18.181641"
+         y="43.364427"
+         id="tspan3"><tspan
+   style="fill:#00aad4;stroke:none"
+   id="tspan1">Database</tspan> (<tspan
+   style="fill:#e07c00;stroke:none"
+   id="tspan2">Index'Old</tspan>)
+</tspan><tspan
+         x="18.181641"
+         y="73.364427"
+         id="tspan5"><tspan
+   style="fill:#00aad4;stroke:none"
+   id="tspan4">Database after the call</tspan> : ABCXEFGHIJ
+</tspan><tspan
+         x="18.181641"
+         y="103.36443"
+         id="tspan7"><tspan
+   style="fill:#e07c00;stroke:none"
+   id="tspan6">Index before the call</tspan>   : 4
+</tspan><tspan
+         x="18.181641"
+         y="133.36443"
+         id="tspan8">Value                   : X</tspan></text>
+  </g>
+</svg>
diff --git a/images/subprogram_contracts_special_attributes-answer3.svg b/images/subprogram_contracts_special_attributes-answer3.svg
new file mode 100644
index 000000000..b68467de7
--- /dev/null
+++ b/images/subprogram_contracts_special_attributes-answer3.svg
@@ -0,0 +1,95 @@
+<?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!-- Created with Inkscape (http://www.inkscape.org/) -->
+
+<svg
+   width="187.51132mm"
+   height="42.68269mm"
+   viewBox="0 0 187.51132 42.68269"
+   version="1.1"
+   id="svg1"
+   inkscape:version="1.3.2 (091e20e, 2023-11-25, custom)"
+   sodipodi:docname="subprogram_contracts_special_attributes-answer3.svg"
+   xmlns:inkscape="http://www.inkscape.org/namespaces/inkscape"
+   xmlns:sodipodi="http://sodipodi.sourceforge.net/DTD/sodipodi-0.dtd"
+   xmlns="http://www.w3.org/2000/svg"
+   xmlns:svg="http://www.w3.org/2000/svg">
+  <sodipodi:namedview
+     id="namedview1"
+     pagecolor="#ffffff"
+     bordercolor="#000000"
+     borderopacity="0.25"
+     inkscape:showpageshadow="2"
+     inkscape:pageopacity="0.0"
+     inkscape:pagecheckerboard="0"
+     inkscape:deskcolor="#d1d1d1"
+     inkscape:document-units="mm"
+     showgrid="false"
+     inkscape:zoom="1.0449705"
+     inkscape:cx="391.87709"
+     inkscape:cy="161.24857"
+     inkscape:window-width="2560"
+     inkscape:window-height="1369"
+     inkscape:window-x="-8"
+     inkscape:window-y="-8"
+     inkscape:window-maximized="1"
+     inkscape:current-layer="layer1" />
+  <defs
+     id="defs1">
+    <rect
+       x="18.182331"
+       y="22.010189"
+       width="739.73376"
+       height="243.06905"
+       id="rect2" />
+    <rect
+       x="38.278591"
+       y="51.676098"
+       width="497.62167"
+       height="295.70212"
+       id="rect1" />
+    <rect
+       x="18.182331"
+       y="22.010189"
+       width="739.73376"
+       height="243.06905"
+       id="rect2-3" />
+    <rect
+       x="18.182331"
+       y="22.010189"
+       width="739.73376"
+       height="243.06905"
+       id="rect2-0" />
+  </defs>
+  <g
+     inkscape:label="Layer 1"
+     inkscape:groupmode="layer"
+     id="layer1"
+     transform="translate(-1.2189481,-105.75423)">
+    <text
+       xml:space="preserve"
+       transform="matrix(0.26458333,0,0,0.26458333,21.594596,105.61028)"
+       id="text1-0"
+       style="font-style:normal;font-variant:normal;font-weight:normal;font-stretch:normal;font-size:24px;font-family:'Courier New';-inkscape-font-specification:'Courier New';text-align:start;white-space:pre;shape-inside:url(#rect2-0);display:inline;fill:#000000;stroke:none;stroke-width:2.46425"><tspan
+         x="18.181641"
+         y="43.364427"
+         id="tspan2"><tspan
+   style="fill:#e07c00;stroke:none"
+   id="tspan1">Database (Index)'Old</tspan>
+</tspan><tspan
+         x="18.181641"
+         y="73.364427"
+         id="tspan4"><tspan
+   style="fill:#e07c00;stroke:none"
+   id="tspan3">Database before the call</tspan>: ABCDEFGHIJ
+</tspan><tspan
+         x="18.181641"
+         y="103.36443"
+         id="tspan6"><tspan
+   style="fill:#e07c00;stroke:none"
+   id="tspan5">Index before the call</tspan>   : 4
+</tspan><tspan
+         x="18.181641"
+         y="133.36443"
+         id="tspan7">Value                   : D</tspan></text>
+  </g>
+</svg>
diff --git a/images/subprogram_contracts_special_attributes-legend.svg b/images/subprogram_contracts_special_attributes-legend.svg
new file mode 100644
index 000000000..8e431b615
--- /dev/null
+++ b/images/subprogram_contracts_special_attributes-legend.svg
@@ -0,0 +1,89 @@
+<?xml version="1.0" encoding="UTF-8" standalone="no"?>
+<!-- Created with Inkscape (http://www.inkscape.org/) -->
+
+<svg
+   width="187.51132mm"
+   height="42.68269mm"
+   viewBox="0 0 187.51132 42.68269"
+   version="1.1"
+   id="svg1"
+   inkscape:version="1.3.2 (091e20e, 2023-11-25, custom)"
+   sodipodi:docname="subprogram_contracts_special_attributes-legend.svg"
+   xmlns:inkscape="http://www.inkscape.org/namespaces/inkscape"
+   xmlns:sodipodi="http://sodipodi.sourceforge.net/DTD/sodipodi-0.dtd"
+   xmlns="http://www.w3.org/2000/svg"
+   xmlns:svg="http://www.w3.org/2000/svg">
+  <sodipodi:namedview
+     id="namedview1"
+     pagecolor="#ffffff"
+     bordercolor="#000000"
+     borderopacity="0.25"
+     inkscape:showpageshadow="2"
+     inkscape:pageopacity="0.0"
+     inkscape:pagecheckerboard="0"
+     inkscape:deskcolor="#d1d1d1"
+     inkscape:document-units="mm"
+     showgrid="false"
+     inkscape:zoom="1.0449705"
+     inkscape:cx="393.79102"
+     inkscape:cy="554.56111"
+     inkscape:window-width="2560"
+     inkscape:window-height="1369"
+     inkscape:window-x="-8"
+     inkscape:window-y="-8"
+     inkscape:window-maximized="1"
+     inkscape:current-layer="layer1" />
+  <defs
+     id="defs1">
+    <rect
+       x="18.182331"
+       y="22.010189"
+       width="739.73376"
+       height="243.06905"
+       id="rect2" />
+    <rect
+       x="38.278591"
+       y="51.676098"
+       width="497.62167"
+       height="295.70212"
+       id="rect1" />
+    <rect
+       x="18.182331"
+       y="22.010189"
+       width="739.73376"
+       height="243.06905"
+       id="rect2-3" />
+    <rect
+       x="18.182331"
+       y="22.010189"
+       width="739.73376"
+       height="243.06905"
+       id="rect2-0" />
+  </defs>
+  <g
+     inkscape:label="Layer 1"
+     inkscape:groupmode="layer"
+     id="layer1"
+     transform="translate(-0.6867882,-1.6995759)">
+    <text
+       xml:space="preserve"
+       transform="matrix(0.26458333,0,0,0.26458333,21.062436,1.5556235)"
+       id="text1"
+       style="font-style:normal;font-variant:normal;font-weight:normal;font-stretch:normal;font-size:24px;font-family:'Courier New';-inkscape-font-specification:'Courier New';text-align:start;white-space:pre;shape-inside:url(#rect2);display:inline;fill:#000000;stroke:none;stroke-width:2.46425"><tspan
+         x="18.181641"
+         y="43.364427"
+         id="tspan1">Legend
+</tspan><tspan
+         x="18.181641"
+         y="73.364427"
+         id="tspan3"><tspan
+   style="fill:#e07c00;stroke:none"
+   id="tspan2">Value on call entry</tspan>
+</tspan><tspan
+         x="18.181641"
+         y="103.36443"
+         id="tspan5"><tspan
+           style="fill:#00aad4;stroke:none"
+           id="tspan4">Value on call return</tspan></tspan></text>
+  </g>
+</svg>
diff --git a/support_files/beamercolorthemeadacore.sty b/support_files/beamercolorthemeadacore.sty
index 8a84c457d..f9cc6408e 100644
--- a/support_files/beamercolorthemeadacore.sty
+++ b/support_files/beamercolorthemeadacore.sty
@@ -14,6 +14,12 @@
 \definecolor{adacore3}{RGB}{185,198,215}   %% light blue
 \definecolor{lightyellow}{RGB}{240,230,160}
 
+% For SVG, we need colors in hex notation, which would be
+% lovelace blue #12284c
+% orange        #e07c00
+% light blue    #b9c6d7
+% Note that the light blue doesn't show up well, so I've been using #55ddff
+
 \setbeamercolor*{palette primary}{fg=adacore1,bg=adacore3}
 \setbeamercolor*{palette secondary}{fg=adacore2,bg=adacore3}
 \setbeamercolor*{palette tertiary}{fg=adacore3,bg=adacore1}