Най-голямото между 3 числа

Напишете програма, която при въвеждане на 3 числа извежда най-голямото от тях.

По желание: Направете програмата да работи за повече числа, например за пет.

Публикувано в с етикети . Постоянна връзка.

Един коментар по Най-голямото между 3 числа

  1. Боряна каза:
     
    program bori;
    var
      chislo, max: integer;
    begin
      WriteLn('Sega shte otkriem nai-goliamoto ot tri chisla.');
    
      WriteLn('Vavedi chislo:');
      ReadLn(chislo);
      max:=chislo;
    
      WriteLn('Vavedi drugo chislo:');
      ReadLn(chislo);
      if chislo>max then
         max:=chislo;
    
      WriteLn('Vavedi drugo chislo:');
      ReadLn(chislo);
      if chislo>max then
         max:=chislo;
    
      WriteLn('Nai-goliamoto chislo e ', max);
      ReadLn;
    end.
          
    

Вашият коментар