logo

Crowdly

Le barème appliqué ici n'est pas représentatif du contrôle. Voici plusieurs...

✅ The verified answer to this question is available below. Our community-reviewed solutions help you understand the material better.

Le barème appliqué ici n'est pas représentatif du contrôle.

Voici plusieurs extraits de programmes typables.

On suppose que Txt renomme l'acteur GAda.Text_IO.

Répondez aux questions posées. Répondez -1 lorsqu'il est impossible de répondre à la question par un nombre.

(Note : Moodle ne permet pas l'indentation).

procedure Glabu (X : Boolean) is

begin

if X = True then

Txt.Put(Aff => "Fooz") ;

else

Txt.Put(Aff => "Barz") ;

end if ;

end Glabu ;

-- Cette ligne est un commentaire

Y : Boolean ;

begin

Y := False ;

Glabu(X => True) ;

Glabu(X => Y = False) ;

Le programme affiche-t-il "Fooz" ?

Le programme affiche-t-il "Barz" ?

Le programme est-il toujours compilable si je remplace tous les Y situés après le commentaire par X ?

Le programme affiche-t-il la même chose si je remplace tous les Y situés après le commentaire par X ?

L'extrait de programme ci-dessous utilise la procédure Glabu définie dans la question précédente.

function Bigger (N1, N2 : Integer) return Boolean is

X : Integer := N1 ;

Y : Integer := N2 ;

begin

return (X > Y) ;

end Bigger ;

X : Integer := 10 ;

Y : Integer := 20 ;

begin

Glabu( X => Bigger(N1 => X, N2 => Y) ) ;

Glabu( X => Bigger(N1 => Y, N2 => X) ) ;

Glabu( X => Bigger(N2 => Y, N1 => X) ) ;

Glabu( X => Bigger(N2 => X, N1 => Y) ) ;

Glabu( X => not False) ;

Ce programme affiche 5 messages. Indiquez lesquels :

Message 1

Message 2

Message 3

Message 4

Message 5

Maintenant, je remplace les trois premières lignes de Bigger par :

function Bigger (N2, N1 : Integer) return Boolean is

X : Integer := N2 ;

Y : Integer := N1 ;

(Attention, chaque ligne porte une modification concernant N1 et N2).

Quels sont maintenant les messages affichés ?

Message 1

Message 2

Message 3

Message 4

Message 5

More questions like this

Want instant access to all verified answers on moodle.insa-toulouse.fr?

Get Unlimited Answers To Exam Questions - Install Crowdly Extension Now!