написать программу на паскале. А.Проверить является ли число двухзначным ? Б.(введено два числа.Вывести их в порядке возрастания

Где три пробела - переход на следующую строку. А то тут итогом уходит все в комментарий, если он присутствует.

A) var a:integer;begin   readln(a);//ввод числа   writeln((a>9)and(a<100));end.Б) var a,b:integer;begin   readln(a,b);//вводим числа, разделяя пробелом   If a>b then writeln(b,' ',a);   if a<b then writeln(a,' ',b);   if a=b then writeln(a,' ',b);//если числа равные, просто пречислить. Можно удалить, но при a=b ничего не выведетend.