Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
mashabrown
0 / 0 / 0
Регистрация: 10.01.2016
Сообщений: 13
1

В одномерном массиве найти сумму четных и количество нечетных элементов

10.01.2016, 16:01. Просмотров 964. Ответов 2
Метки нет (Все метки)

Дан массив из 20 целых чисел из диапазона [10,100). Найдите в нем сумму четных и количество нечетных элементов.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
10.01.2016, 16:01
Ответы с готовыми решениями:

Найти сумму четных и количество нечетных элементов
Дан массив из 20 целых чисел из диапазона [10,100). Найти в нем сумму четных и количество нечетных...

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

Найти в одномерном массиве сумму и количество элементов
Если кому-нибудь понадобиться найти в одномерном массиве сумму, количесво и т. д., то я могу с этим...

Найти сумму и количество четных элементов массива, стоящих на нечетных местах
дан массив (B) из (N) элементов.Найти сумму и кол-во четных элементов стоящих на нечетных местах

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

2
Xo6ut
101 / 88 / 75
Регистрация: 04.11.2011
Сообщений: 1,785
10.01.2016, 16:41 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
var
a:array[1..20] of integer;
i,s,n:integer;
begin
 for i:=1 to 20 do 
  begin
  a[i]:=random(90)+10;
  write(a[i],' ');
  end;
  writeln;
   s:=0;
   n:=0;
     for i:=1 to 20 do 
     begin
      if (a[i] mod 2 = 0) then s:=s+a[i];
      if (a[i] mod 2 <> 0) then n:=n+1;
     end;
      writeln('Сумма четных элементов = ',s);
      writeln('Количество нечетных элементов = ',n);
end.
1
mashabrown
0 / 0 / 0
Регистрация: 10.01.2016
Сообщений: 13
10.01.2016, 17:19  [ТС] 3
спасибо большое))
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.01.2016, 17:19

Найти количество четных и нечетных чисел в массиве
заполнить массив А из целых чисел и вывести их на экран .Найти количество четных и нечетных чисел в...

Найти сумму четных и произведение нечетных элементов матрицы
3. Дана матрица A(n, n). Найти сумму четных и произведение нечетных элементов матрицы. Добавлено...

Найти сумму нечетных элементов массива четных столбцов
Дан двумерный массив размером в 5 строк и 5 столбцов,заданных с помощью генератора случайных чисел...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru