Сколько символов можно сохранить в таком же количестве ячеек оперативной памяти

  var a,b,c,d: integer;

begin

writeln ('vvedite a');

  read(a);

writeln ('vvedite b');

  read(b);

writeln ('vvedite c');

  read(c);

writeln ('vvedite d');

  read(d);

if (a> b) and (a> c) and (a> d)  then writeln('samoe bolshoe chislo - a')

  else writeln('a ne samoe bolshoe');

end.

var a,b: integer;

begin

  read(a,b);

  writeln(a,'> ',b,' - ', a> b);

  writeln(a,'< ',b,' - ', a< b);

  writeln(a,'=',b,' - ', a=b);

  read(a,b);

  writeln('sotrudnik podhodit - ', (a> =3) and (b< =35));

end.