Сколько знаков должен был знать китаец, умеющий читать и писать?

2000 знаков (но точно не уверен) 

1 кбайт=1024 байта

1 байт=8 бит

81920/8=10240 байт

10240/1024=10 кбайт

var a: integer;

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