.....................................
<span>город - путеводитель по городу
</span><span>автомобиль - техническое описание автомобиля</span>
Вроде бы так, но со своим ответом проверь
T=10 с
i=8 бит
D= 8000 Гц
k=1
V=D*k*i*t=10*8*8000=640 000 бит
Задание не совсем корректное. Если в массиве хранятся числа и отсутствие осадков принято за "0", то программа выглядит так
var i: integer;
a: array[1..31] of integer;
begin
for i:=1 to 31 do read(a[i]);
for i:=1 to 31 do
if a[i]=0 then write(i, ' ');<span>
end.
</span>