Elaborați un program care determina numărul minim dintre numere reale x,y,z valoare cărora este citită de la tastatură

Răspuns :

Minimum din trei numere Pascal:

var  

  x,y,z,min:real;

begin

     write('Numere:');

     readln(x,y,z);

     if x<z then

     min:=x

     else  

     min:=z;

     if min<y then

     writeln('Minimum exte:',min)

     else  

     writeln('Minimum este:',y);

end.

Vă mulțumim că ați ales să vizitați platforma noastră dedicată Informatică. Sperăm că resursele disponibile v-au fost de ajutor. Pentru întrebări sau asistență suplimentară, nu ezitați să ne contactați. Ne bucurăm să vă revedem în curând și vă invităm să ne salvați în lista de site-uri preferate!


RO Learner: Alte intrebari