сервис вопросов и ответовДан массив целых чисел, состоящий из 30 элементов, найти сумму элементов массива, имеющих нечетное значение.
5-9 класс|
|
9 класс, pascal abc
Nastyushaelina
28 апр. 2014 г., 9:31:13 (10 лет назад)
MichaelS
28 апр. 2014 г., 10:27:41 (10 лет назад)
uses crt;
const n=10;
var a:array[1..n] of integer;
i,s:integer;
begin
s:=0;
for i:=1 to n do
begin
read(a[i]);
if a[i] mod 2 <>0 then s:=s+a[i];
end;
writeln(s);
end.
Ответить
Другие вопросы из категории
Файл размером 24 Кбайт передаётся через некоторое соединение за 80 секунд. Определите размер файла (в Кбайтах), который можно передать через это же
соединение за 2 минуты. В ответе укажите одно число — размер файла в Кбайтах
Читайте также
1.Дан массив целых чисел из 25 элементов. Заполнить его случайными числами до 50. Найти сумму всех четных элементов массива и их количество.
2.Дан массив целых чисел из 25 элементов. Заполнить его случайными числами от 0 до 50. Заменить все четные элементы на их квадраты, а нечетные удвоить.
1.Дан массив целых чисел, найти среднее арифметическое всех элементов массива.
2. Дан массив целых чисел,найти количество отрицательных элементов массива.
3. Дан массив целых чисел,найти количество чётных чисел в массиве.
Помогите, пожалуйста, решить задачу на языке программирования в Turbo Pascal: 1.Дан массив целых чисел, состоящий из 10 элементов.Заполнить его
с клавиатуры. Найти:
-Удвоенную сумму положительных элементов;
-вывести индексы тех элементов, значения которых больше значения предыдущего элемента(начиная со второго).
2.Определить,есть ли 2 пары соседних элементов с одинаковыми знаками.
Вы находитесь на странице вопроса "Дан массив целых чисел, состоящий из 30 элементов, найти сумму элементов массива, имеющих нечетное значение.", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.