Данапоследовательность неотрицательных чисел, последние - вопрос №10023921 от Пожалуйста1531 04.06.2021 20:26

Question

Информатика: Данапоследовательность неотрицательных чисел, последние из которых равно нулю; причем других равных нулю чисел в последовательности нет. найти среднее арифметическое всех положительных чисел последовательности

Пожалуйста1531 · Answer

var a,s,k: integer;beginreadln(a);s:=0;k:=0;while(a 0) dobeginif a 0 then begins:=s+a;k:=k+1;end;readln(a);end;write(s/k);end....