Var
t,st:real;
i:integer;
begin
for i:=1 to 7 do begin
readln(t);
st:=st+t;
end;
writeln('Средняя температура за первую неделю сентября: ',st/7,' °C');
end.<span>
</span>
вобще меня учитель учил это делать так:
Самое понятное решение таких задач, с моей точки зрения, такое
Обозначим за X 4-ю строку
Тогда 5)ХХE
6)XXEXXEF
7)<u>XXEXXEFXXE</u>XXEFG
В 4-ой строке 15 символов
Значит в 7-й подчеркнутый момент составляет 30*3+4=94
Т.е на 95 месте будет начало строки Х
<span>AABAABCAABA<u>ABCD</u> дальше опять идет Х т.е<u> </u></span><u>AA</u>BAABCAABAABCD
Т.е ответ <u>ABCD</u><u>AA</u>
1)k=20*320=6400;
2)n=64; n=2^i; i=6 бит
3)I=ik=6400*6=38400 бит= 4800 байт= 4 Кбайт
Ответ: 4 Кбайт
