[Electronic_Arts]

Код:

var
  f:file of byte;
  i,k,kolvo:byte;