Как решить в массиве хранится информация о количестве осадков выпавших за каждый день января.Определите в какие дни осадков не было.Помогите пожалуйста!

1

Ответы и объяснения

Лучший Ответ!
2014-03-30T10:48:48+00:00
Var a:array[1..31] of integer;
i:integer;
begin
for i:=1 to 31 do
read(a[i]);
for i:=1 to 31 do
if a[i]=0 then write(i,' ');
end.