Склавиатуры вводится натуральное чётное число n, не превосходящее 180. определите n-ую цифру в ряду: 1011121314…9899. в данном ряду подряд выписаны все двузначные числа. на экран вывести одно число – искомую цифру.

var

a,b: integer;

begin

write('введите в одной строке два целых числа и нажмите < enter> ');

readln(a,b);

if a=b then writeln('числа равны')

else 

if a> b then writeln(a,' больше')

else writeln(b,' больше')

end.

формула имеет вид: =b$1*$a2