Fonction

Question

Bonjour tout le monde , répondez s'il vous plaît à cette question et merci

 Utiliser une seule fonction nommer minmax qui permet de déterminer le minimum ou le maximum d'un tableaux d'entires selon le choix

jc80 · Answer

Bonjour aussi

Pas de bonjour + pas de merci = Pas de solution

Salem · Answer

Je pense et à la limite de mon interprétation, pour qu'une fonction renvoie au choix le minimum ou le maximum d'un tableau, le traitement peut en découdre à l'aide d'un Selecteur, un caractère, un mot ou un chiffre comme 0 et 1. Pour vous venir en aide, j'ai testé cette solution sous Delphi 10.1 Berlin, j'espère qu'il fonctionne sur votre version sans encombre .

program Project1;

//{$APPTYPE CONSOLE}

//{$R *.res}

//uses
  //System.SysUtils;

const Max = 10;
type Tableau = array[1 .. Max] of Integer;

function MinMax(Selecteur : Integer; T : Tableau) : Integer;
var I, Resultat : Integer;
begin
Resultat := T[1];
  case Selecteur of
  0 :
    for I := 2 to Max do
      if T[I] < Resultat then
      Resultat := T[I];


   1 :
    for I := 2 to Max do
      if T[I] > Resultat then
      Resultat := T[I];

      end;

   MinMax := Resultat;
  end;

  var T : Tableau;
 Selecteur : Integer;
begin
T[1] := 111;
 T[2] := 69;
  T[3] := 11;
   T[4] := 1313;
    T[5] := 9;
T[6] := 78;
 T[7] := 41;
  T[8] := 0;
   T[9] := 105;
    T[10] := 34;
Selecteur := 1;
 WriteLn(MinMax(Selecteur, T));
  Readln;
end.

Fonction

2 réponses

Discussions similaires

Newsletters