сервис вопросов и ответовсоставить проект. вычислить среднее арифметическое отрицательных элементов массива С1,С2...С30 , пологая, что в массиве есть отрицательные значения. (
10-11 класс|
|
это нужно сделать в паскале.)
AngelikaLikaLika1
26 июля 2014 г., 18:09:14 (9 лет назад)
Region13
26 июля 2014 г., 19:24:34 (9 лет назад)
var
c: array[1..30] of integer;
i,n,k:integer;
begin
n:=0;
k:=0;
for i:=1 to 30 do
readln(c[i]);
for i:=1 to 30 do begin
if c[i]<0 then begin
n:=n+1;
k:=k+c[i];
end;
end;
writeln('srednee=', k/n )
end.
Ответить
Другие вопросы из категории
Найти сумму двузначных нечетных чисел. Вывести сумму. А также выводить на экран сколько вводилось двузначных чисел и сколько из них
было нечетных. То есть всего должно быть 3 вывода. Помогите пожалуйста!
в Pascal ABC
кто еще знает такую задачу помогите кому не сложно)
Программа которая будет определять нечетное количество цифр, содержащихся в тексте
Читайте также
1. Задайте массив из 10 элементов с помощью датчика случайных чисел. Найдите среднее арифметическое нечетных элементов массива с нечетными
индексами. выведите на экран исходный массив и полученное среднее арифметическое.
2. Задайте массив из 10 элементов с помощью датчика случайных чисел. замените все элементы с четными индексами максимальными. Выведите на экран исходный и измененный массивы
Помогите исправить программу. Она должна вычислять среднее арифметическое всех чисел в массиве меньших 50. Вот программа:
Program Zadacha;
Uses crt;
var a:array[1..1000] of integer;
c,i,n,s :integer;
s1: real;
begin;
clrscr;
writeln("Введите размерность массива);
readln(n);
writeln('Введите массив');
for i:=1 to n do
begin a[i]:=random(100);
if a[i]<50 then begin inc(c); s:=s+a[i];end;s:=s+a[i];s1:=s/N;
writeln('Массив A:');
for i:=1 to N do write(a[i]:4);
writeln;
writeln('Среднее арифметическое равно=',s1);
end;
end.
В двумерной матрице A(N, M), состоящей из произвольных чисел, определить номера столбцов, в которых среднее арифметическое его элементов меньше чем
среднее арифметическое элементов массива.
1)Вывести в обратном порядке второе слово строки. Подсчитать количество букв в нем.
2) Составить программу для вычисления Т=(R/Q+1)+S. R - наименьший элемент массива;
Q - произведение элементов массива с нечетными номерами;
S - количество элементов, лежащих в интервале (A,B) (ввести с клавиатуры).
3) Вычислить среднее арифметическое положительных элементов матрицы, расположенных ниже
побочной диагонали. Закрасить указанные элементы.
для массива x(20) имеющего положительные элементы, вычислите среднее арифметическое положительных элементов массива.(можно с подробным
решением?методические указания приветствуются)
Вы находитесь на странице вопроса "составить проект. вычислить среднее арифметическое отрицательных элементов массива С1,С2...С30 , пологая, что в массиве есть отрицательные значения. (", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.