сервис вопросов и ответовВ массиве A[100] найти среднее арифметическое, кратных 5 и кратных 3 элементов массива.
5-9 класс|
|
Anastesiaa
24 авг. 2016 г., 10:58:17 (7 лет назад)
Korsakovatanja
24 авг. 2016 г., 12:34:49 (7 лет назад)
var
i,n:integer;
p:real;
a:array[1..100]of integer;
begin
for i:=1 to 100 do
begin
a[i]:=random(50)+1;
write(a[i],' ');
if (a[i] mod 5=0) and (a[i] mod 3=0) then
begin
p:=p+a[i];
n:=n+1;
end;
end;
writeln;
p:=p/n;
writeln('Ответ: ',p);
end.
Ответить
Другие вопросы из категории
Преобразовать приведенную ниже информацию к табличному виду, определив имя таблицы и название каждого поля: Оля, Петя, 13, пе-ние, 14, баскетбол, Вася,
Катя, 13, хоккей, баскетбол, футбол, 15, 11, Коля, 11, танцы, Сережа.
1)Сложить и вычесть восьмиричные числа56 и 72; 35 и 43
2)Сложить и вычесть шестнадцатиричные числа
6А и 2В; 98 и 3А
Читайте также
1)составьте программу ввода элементов массива а[1..8 ] с клавиатуры и вывода на экран элементов с отрицательными значениями; 2)составьте
программу ввода элементов массива b[1..6] с клавиатуры и вывода на экран элементов с положительными значемиями
1.Дан массив целых чисел, найти среднее арифметическое всех элементов массива.
2. Дан массив целых чисел,найти количество отрицательных элементов массива.
3. Дан массив целых чисел,найти количество чётных чисел в массиве.
1)ввести с клавиатуры массив А из 5 элементов, найти минимальное из них 2)умножить все элементы массива А на 2 3)найти среднее
арифметическое всех элементов массива a
СРОЧНО НАДО 1.Заменить первый отрицательный элемент нулем 2.Умножить все элементы, кратные трем, на третий элемент массива 3.Из
элементов массива Р сформировать массив М того же размера по правилу: если номер четный , то Рi=i*Mi, если нечетный, то Рi=-Mi
Вы находитесь на странице вопроса "В массиве A[100] найти среднее арифметическое, кратных 5 и кратных 3 элементов массива.", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.