...................................................
<span>If (a>=10) and (a<=99)
then begin
writeln (a,'-двузначное число');
writeln ('его квадрат=', sqr(a));
end
else (a,' не является двузначным числом');</span>
4) а < 0
судя по этому должна быть ошибка в паскале...