Сколько объектов можно одновременно открыть в Windows. Где они располагаются?

var a: integer;

begin readln(a); if (4 * a > 9) and (4 * a < 100) then writeln('периметр двузначное число') else writeln('периметр не двузначное число'); end.

1) 28

2) 6

3) 5

4) 1

5) 7

6) 27

итого:

1, 6, 5, 2, 3, 4.

мне сказали,что 4 секунды

или

4e10 (4 в степени 10) х 2 х 8 ( 1 байт = 8 бит)= 640000000000 бит общий объём текстогого файла в битах.  640000000000 / 512e3( 512 в степени 3= 512 килобит)=1250000 секунд=347,22 часа =14,5 суток

если не считать пропущенное равно, то нужна разница квадратов в и а