Решить на pascak вот даны числа a, b, c. проверьте, выполняется ли условие, что все три числа двузначные. вводные даные 35 35 35 выводные true водные 35 3 5 выводные false надо

Var

a,b,c:integer;

begin

 read(a,b,c);

 If ((a div 10)>0) and ((b div 10)>0) and ((c div 10)>0)

  then writeln('true')

 else writeln('false');

 readln

end.