Question

Помогите срочно пожалуйста

Answer 1

var
  a: array of string;
  i: integer;

begin
  a := System.IO.File.ReadAllLines('input.txt');
  i := Integer.Parse(a[0]);
  a := a[1].Split(' ');
  for i := 0 to i - 1 do
    System.IO.File.AppendAllText(integer.Parse(a[i]) mod 11 = 0 ? a[i] + ' ' : ''); //Любое двузначное число с двумя цифрами одинаковыми делится на 11 без остатка, даже 00 :)
end.