Написать программу,которая вычисляет среднее арифметическое ненулевых элементов введенного с клавиатуры массива из 10 целых чисел. ,плохо понимаю эти

147

248

Посмотреть ответы 2

Ответы на вопрос:

Lider4k

Информатика

4,7(95 оценок)

Var a: array [1..10] of integer; i,count: integer; s: real; begin //тут ты заполняешь массив как тебе надо s: =0; count: =0; for i: =1 to 10 do begin if a[i]< > 0 then begin //если элемент ненулевой то s: =s+s; //суммируем их и увеличиваем счетчик на 1 count: =count+1; end; end; s: =s/count; writeln('среднее значение=', s: 0: 0); end.

supertriom

Информатика

4,7(96 оценок)

Это таблица истиности над в черточка v c ^ над а черточка v-"или это сложение ^ это умножение над х бувкой четрточка это другое число если 0 то 1 если 1 то 0 или это "не" а б с над в чёрточка над а чёрточка не в или с не в или с и не а 0 0 0 1 1 1 1 0 0 1 1 1 1 1 0 1 0 0 1 1 1 0 1 1 0 1 1 1 1 0 0 1 0 1 0 1 0 1 1 0 1 0 1 1 0 0 0 1 0 1 1 1 0 0 1 0 ответ пиши короче f(a,b,c)=не в или с и не а =не а