Составьте программу в Pascal ABC которая определяет является ли число 10 двузначным.

program z1;Var a:integer;Begin read(a);if (a>9) and (a<100) then writeln(a, '-двузначное число')else writeln(a, '-не является двузначным числом');end.