пусть с клавиатуры вводятся последовательно N целых чисел. Найти количество двухзначных чисел

На Паскале: Program Count; Uses crt; Var a,n: integer; Begin n:=0; While not EOF do begin /Бесконечный цикл, выход по нажатию клавиши ESC/Writeln('Введите число> '); readln (a); If a>9 and a<100 then inc(n); if a=#27 then Begin Write (/Количество двузначных чисел/ ,n); Break; End; EndНа С++ :#using "iostream"#using namespace std;void main(){ int a,n: integer;n:=0; { for<<(/Введите число/); If a>9 & a<100;if a=+27; }return 0;system ("pause"); }