Слово часы может быть сохранено в файле размером.битов от души !

Например:

Слово ball может быть сохранено в файле размером

битов.

Если в кодировке 1 символ = 8 битов, то ball = 32 бита.

Если 1 символ = 64, то ball = 64 бита.

program;   var  i: byte;   str: string;   begin  for i: =60 to 70 do  begin  str: =str+chr(i) ;   end;   writeln(str);   end.

паскаль же?

var s, x: string; c, n, err, i, d, k: integer; begin readln (s); n: =length(s); for i: =1 to n do begin

d: =d+k;

val(s,k,err);

end;

write (d);

end.