File: prof_pgcd_recursif.alg

package info (click to toggle)
algobox 0.9%2Bdfsg-1
  • links: PTS, VCS
  • area: main
  • in suites: jessie, jessie-kfreebsd, stretch
  • size: 1,732 kB
  • sloc: cpp: 12,047; makefile: 11
file content (19 lines) | stat: -rw-r--r-- 1,128 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
<?xml version="1.0" encoding="UTF-8"?>
<Algo>
    <description texte="Détermination du pgcd de deux entiers à l'aide d'une fonction récursive&#xa;(exemple d'utilisation de panneau &quot;Fonction avancée&quot;)" courant="AFFICHER pgcd"/>
    <fonction fctcode="" fctetat="inactif"/>
    <F2 F2defaut="F2(p,q-p)" F2lignes="p==0@q#q==0@p#q&lt;=p@F2(p-q,q)#" F2etat="actif" F2para="p,q"/>
    <repere repetat="inactif" repcode="-10#10#-10#10#2#2"/>
    <item algoitem="VARIABLES" code="100#declarationsvariables">
        <item algoitem="p EST_DU_TYPE NOMBRE" code="1#NOMBRE#p"/>
        <item algoitem="q EST_DU_TYPE NOMBRE" code="1#NOMBRE#q"/>
        <item algoitem="pgcd EST_DU_TYPE NOMBRE" code="1#NOMBRE#pgcd"/>
    </item>
    <item algoitem="DEBUT_ALGORITHME" code="101#debutalgo">
        <item algoitem="LIRE p" code="2#p#pasliste"/>
        <item algoitem="LIRE q" code="2#q#pasliste"/>
        <item algoitem="pgcd PREND_LA_VALEUR F2(p,q)" code="5#pgcd#F2(p,q)#pasliste"/>
        <item algoitem="AFFICHER pgcd" code="3#pgcd#0#pasliste"/>
    </item>
    <item algoitem="FIN_ALGORITHME" code="102#finalgo"/>
</Algo>