Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
asya3_3
0 / 0 / 0
Регистрация: 21.09.2014
Сообщений: 19
#1

Подсчет и вывод на экран суммы элементов массива с нечётными значениями - Pascal ABC

16.10.2015, 22:07. Просмотров 228. Ответов 1
Метки нет (Все метки)

Составьте программу , которая заполняет массив a[1..8] случайными целыми числами в диапозоне от1 до 10 и выводит на экран сумму эллементов массива с нечётными значениями.
http://www.cyberforum.ru/pascalabc/thread2182882.html
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
16.10.2015, 22:07
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Подсчет и вывод на экран суммы элементов массива с нечётными значениями (Pascal ABC):

Составить и вывести на экран массив со значениями отрицательных элементов исходного массива.
1. Вводится размер одномерного массива A(N) и его элементы. Составить и вывести...

Суммы элементов с нечётными и чётными номерами столбцов
Составить программу, которая находит в каждой строке матрицы P(k,l), k≤12,...

Заполнить массив Х(10) случайными значениями. Организовать вывод на экран. Присвоить указателю адрес начала размещения массива в памяти. Напечатат
Заполнить массив Х(10) случайными значениями. Организовать вывод на экран....

Преобразовать массив ,увеличив все элементы с нечётными значениями в три раза, элементы с чётными значениями
Составьте программу,которая заполняет массив a случайными целыми числами в...

Сформировать два массива: из элементов с чётными и из элементов с нечётными индексами
Дан массив Y1, ... , Y15. Сформировать два массива: из элементов с чётными и...

1
ite
9 / 9 / 14
Регистрация: 26.09.2015
Сообщений: 26
16.10.2015, 22:13 #2
Лучший ответ Сообщение было отмечено asya3_3 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
const
     N=8;
var
   i,r,s:integer;
   m:array [1..N] of integer;
begin
for i:=1 to N do
  begin
    r:=random(10)+1;
    m[i]:=r;
    write(m[i]:3);
    if odd(m[i]) then
      inc(s,r);
  end;
writeln;
writeln('Сумма нечетных элементов массива: ',s);
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
16.10.2015, 22:13
Привет! Вот еще темы с решениями:

Вывод элементов массива с четными значениями и четными индексами
составьте программу ввода с клавиатуры элементов массива a и вывода на экран...

Вывод на экран элементов массива
Дан двухмерный массив. Вывести на экран все элементы n-го столбца массива,...

Найти произведение элементов массива с нечётными номерами
В одномерном массиве A который состоит из N действительных элементов вычислить...

В каждой чётной строке заданной матрицы вычислить сумму элементов с нечётными номерами столбцов. Вывести эти суммы с указанием номеров строк
В каждой чётной строке заданной матрицы вычислить сумму элементов с нечётными...


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

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

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