Question

Сделайте, пожалуйста, на Pascal
Срочно!

Answer 1

===== PascalABC.NET =====

begin

 if Abs(ReadInteger('Введи число:')).InRange(10,99) then

   Print('Число двухзначное')

 else

   Println('Число не двухзначное')

end.