WADNEX
1

Найти среднее арифметическое, кратных 5 и кратных 3 элементов массива

20.05.2014, 21:41. Показов 3925. Ответов 1
Метки нет (Все метки)

В массиве A[100] найти среднее арифметическое, кратных 5 и кратных 3 элементов массива.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
20.05.2014, 21:41
Ответы с готовыми решениями:

Найти среднее арифметическое элементов массива, кратных 11
Дан целочисленный массив из 30 элементов. Элементы массива могут принимать значения от -1000 до...

Подсчитать среднее арифметическое элементов массива, кратных 3
1) подсчитать средние арифметическое элементов кратных 3 2) переписать в другой массив а затем...

Определите среднее арифметическое элементов кратных 3, но не кратных 5 для каждой строки матрицы
народ помогите кто может.просто препод мне дал 50 заданий.нужно решить до конца мая.вот я сдал с...

Найти среднее арифметическое чисел, кратных трём
Написать программу, помогающую найти среднее арифметическое чисел, кратных трём. На вход программа...

1
399 / 378 / 408
Регистрация: 14.09.2013
Сообщений: 1,204
20.05.2014, 22:02 2
Лучший ответ Сообщение было отмечено как решение

Решение

WADNEX, такое уже решали, ну может не такое но подобное..
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
uses crt;
const n=100;
var a:array[1..n] of integer;
    i,k:integer;
    s:real;
begin
 writeln('Ìàññèâ :');
 k:=0;
  for i:=1 to n do
   begin
    a[i]:=-15+random(40);
    write(a[i],' ');
    if (a[i] mod 5=0) and (a[i] mod 3=0) then
     begin
      s:=s+a[i];
      inc(k);
     end;
   end;
writeln;
 writeln('Ñðåäíåå àðèôìåòè÷åñêîå, êðàòíûõ 5 è êðàòíûõ 3 = ',s/k:0:2);
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
20.05.2014, 22:02
Помогаю со студенческими работами здесь

Дан массив из N элементов.Определить среднее арифметическое кратных 5 и некратных 10
Помогите пожалуйста написать программу на Паскаль. Только без random, если можно

Из элементов матрицы, кратных 3, создать вектор и определить среднее арифметическое положительных элементов
Дан массив: uses crt; Type Mas = array of integer; Var A, B : Mas; i,j:integer; begin...

Найти среднее арифметическое двузначных чисел из заданного промежутка кратных трем
И как самим проверить объясните а то у нас препод всегда заставляет нас проверять самим

Определить количество элементов массива, кратных 3, но не кратных 5
дан массив из н элементов(натур числа). Определите кол во элементов кратных 3 но не кратных 5


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru