30 байт, т.к 1 символ=8 бит, I=8*30=240 бит =>240/8=30 байт
В 2-ой - 11101010
в 8 - ой - 352
в 16 - ой - ЕА
<span> <span>var
n,k:integer;
a:real;
i:byte;
begin
for i:=1 to 7 do
begin
Write('Температура на ',i,'день ');
read(n);
k:=k+n;
end;
a:=k/7;
writeln('Средняя температура=',a);
readln;
readln;
end.</span></span>