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

Публикувано на 08 февруари, понеделник от Данаил

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

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

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

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

  1. Боряна каза:
    11 февруари, четвъртък в 08:07 
     
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.

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