1.На вход программе даётся число N и N чисел (все натуральные <10000).
Нужно вывести то число, в котором наименьшее количество цифр.
Если таких чисел несколько, вывести любое из них.Примеры: 4 123 24 167 8762 => 24; 5 13 4 16 100 8 => 4

2.Программа должна вывести все четырёхзначные числа, которые являются палиндромами (т.е. читаются одинаково справа налево и слева направо).
Пример: 1001 1111 1221 1331 ... 9889 9999

Задача 1.varn, i, lmin, a, min: integer;beginreadln(n);lmin:=32000;for i:=1 to n do begin  read(a);  if length(inttostr(a))<lmin then begin lmin:=length(inttostr(a)); min:=a; end; end;write(min);end.Задача 2.vari: integer;s: string;beginfor i:=1000 to 9999 dobegin s:=inttostr(i); if (s[1]=s[4]) and (s[2]=s[3]) then writeln(i);end;end.Писалось в Pascal ABC. Если возникнуть какие-то вопросы или будут ошибки во время выполнения программы, пиши в комментариях