В связи с визитом Императора Палпатина было решено обновить состав дроидов в ангаре 32. Из-за кризиса было решено новых дроидов не закупать, но выкинуть пару старых. Как известно, Палпатин не переносит дроидов с маленькими серийными номерами, так что все, что требуется - найти среди них двух, у которых серийные номера наименьшие. Входные данные
Первая строка входного файла содержит целое число N – количество дроидов. (2 ≤ N ≤ 1000), вторая строка – N целых чисел, по модулю не превышающих 2*109 – номера дроидов

Выходные данные
Выведите два числа: первым – последний по величине из номеров дроидов (такого следует утилизировать в первую очередь), а вторым – предпоследний.

vara,b: integer; c: real; beginwriteln ('1'); read (a); writeln ('2'); read (b); c: =(a/1)/(1/b); writeln (c); end.

1)

var a,b,c,d: real;

begin

  read(a,b);

  c: =(a+b)/2;

  d: =2*a*b;

  if a> b then begin

    a: =d;

    b: =c;

  end;

  if a< b then begin

  a: =c;

  b: =d;

  end;

  writeln(a,' ',b);

end.

2)

var a,b: integer;

begin

  read(a,b);

  if (a< 1) or (a> 31) then writeln(' день введен неправильно');

  if (b< 1) or (b> 12) then writeln(' месяц введен неправильно');

end.

3)

var a,b,c: real;

begin

  read(a,b,c);

  if (a> b)and(a> c)then writeln(a);  

    if (b> a)and(b> c)then writeln(b);

  if (c> b)and(c> a)then writeln(c);

end.

на один символ отводится 1 байт 30 строк по 70 символов - 2100 символов 5 страниц-это 10500 символов так что ответ 10500 байт