Sum:=0;
for i:=55 downto 42 do sum:=sum+i;
Репетиция-это цикл. Т.е. ты повторяешь одно и тоже(оттачиваешь навыки).
Var x: array[1..8] of longint;
Var i,a : longint;
Begin
for i:= 1 to 8 do
begin;
readln(a);
x[i] := a;
end;
Writeln('Массив K:');
for i:= 1 to 8 do
begin;
writeln(',i,' = ',x[i]);
end;
Readln;
end.
73 символа * 1 байт (вес одного) = 73 байта.
Либо 146, так как неизвестно в какой кодировке было записано высказывание.
Каждый символ кодируется 2 байтами, то есть i=2 байт переводим в бит. i=16 бит. Всего символов 32. Значит, I = 32*16 = 512 бит
Ответ:512 бит