Кто хуже? тинкер или инвокер? в доте 2

Var n:integer;
a:array[1..27] of string[15]=
 ('один','два','три','четыре','пять','шесть','семь','восемь','девять',
  'десять','одиннадцать','двенадцать','тринадцать','четырнадцать',
  'пятнадцать','шестнадцать','семнадцать','восемнадцать','девятнадцать', 
  'двадцать','тридцать','сорок','пятьдесят','шестьдесят','семьдесят',
  'восемьдесят','девяносто');
begin
write('N (1..99) = ');
readln(N);
if (n>=1)and(n<=19)
  then writeln(a[n])
  else begin 
       write(a[n div 10 + 18]);
       if n mod 10 <> 0 then write(' ',a[n mod 10]);
       writeln;
       end;
end. 

Пример:
N (1..99) = 46
сорок шесть

1. А) Шахматы | теннис

2.

1) https://ps.1sept.ru/ - сайт газеты для учителя «Первое сентября»

2) https://www.admrebr.ru/ - новый сайт администрации Ребрихинского района

3) https://hermitagemuseum.org/wps/portal/hermitage/?lng=ru - официальный сайт Государственного эрмитажа

Объяснение:

1.

Чем больше ИЛИ (|) тем больше страниц будет найдено.

Чем больше И (&) тем меньше страниц будет найдено.

На кругах Эйлера в варианте А будут закрашены оба круга, в варианте Б только один из кругов, в варианте С только место, где два круга пересекаются.

2. Просто вбиваем что нужно найти в любой поисковик.