1символ= 1 байт
1 байт = 8 бит
256 бит / 8 бит = 32 символа
Var
sum, count, t : integer;
begin
sum := 0; count := 0;
while not eoln do
begin
read (t);
if t > 0 then
begin
sum := sum + t;
count := count + 1;
end;
writeln (sum, ' ', count);
end.
если количество элементов указано
var
sum, count, t, n, i : integer;
begin
sum := 0; count := 0;
read (n);
for i := 1 to n do
begin
read (t);
if t > 0 then
begin
sum := sum + t;
count := count + 1;
end;
writeln (sum, ' ', count);
end.
Что надо делать там вапросы ???
9 сигналов - кодируются 4 разрядами. 2^4 =16. 3 разряда не подойдет 2^3=8.
Следовательно один сигнал = 4 бита.
160 * 4 = 64 бита / 8 бит = 8 байт