---

program n_2;
var a,b,c,d,e: integer;
begin
  writeln('Введите 5 чисел');
  readln(a,b,c,d,e);
  begin
  if (a>b) and (a>c) and(a>d) and(a>e) then writeln('Наибольшее число: ', a)
   else if (b>a) and (b>c) and(b>d) and(b>e) then writeln('Наибольшее число: ', b)
    else if (c>a) and (c>b) and(c>d) and(c>e) then writeln('Наибольшее число: ', c)
     else if (d>a) and (d>b) and(d>c) and(d>e) then writeln('Наибольшее число: ', d)
      else if (e>a) and (e>b) and(e>c) and(e>d) then writeln('Наибольшее число: ', e)
end;
begin
 if (a<b) and (a<c) and (a<d) and (a<e) then writeln('Наименьшее число: ', a)
  else if (b<a) and (b<c) and (b<d) and (b<e) then writeln('Наименьшее число: ', b)
   else if (c<a) and (c<b) and (c<d) and (c<e) then writeln('Наименьшее число: ', c)
    else if (d<a) and (d<b) and (d<c) and (d<e) then writeln('Наименьшее число: ', d)
     else if (e<a) and (e<b) and (e<c) and (e<d) then writeln('Наименьшее число: ', e)
     end;
end.

---

---

---