👤
a fost răspuns

Fie 4 numere reale a,b,c,d. Elaborati o functie, in Pascal , care determina minimul dintre acestea. Va rog mult! ajutati-ma! Dau coroana!!

Răspuns :

Vippass
program proj_min_num; 
var  a,b,c,d,min: integer;
begin  
WriteLn('Introduceti 4 numere (apasati enter dupa fiecare):');  
ReadLn(a);  
ReadLn(b);
  ReadLn(c);
  ReadLn(d);
   WriteLn('Cel mai mic este: ', Min(a,b,c,d));  
ReadLn;end.

Alte intrebari