Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/4: Рейтинг темы: голосов - 4, средняя оценка - 4.50
Irina1995
1 / 1 / 0
Регистрация: 15.03.2013
Сообщений: 48
1

Найти сумму всех элементов массива целых чисел

15.03.2013, 18:08. Просмотров 648. Ответов 3
Метки нет (Все метки)

Найти сумму всех элементов массива целых чисел, удовлетворяющих условию: остаток от деления на 2 равен 3. Размерность массива -20. Заполнение массива от 200 до 300.

Помогите!Пожалуйста!
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
15.03.2013, 18:08
Ответы с готовыми решениями:

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

Найти сумму всех элементов массива целых чисел, которые меньше среднего арифметического элементов массива
Помогите пожалуйста найти в чем ошибка? Пишет что арифметическое переполнение!...

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

Найти сумму всех элементов массива целых чисел, удовлетворяющих условию: остаток от деления на 2 равен 3
Найти сумму всех элементов массива целых чисел, удовлетворяющих условию:...

Найти сумму всех элементов массива целых чисел, удовлетворяющих условию: остаток от деления на 2 равен 3
Помогите найти решения..... 240.Найти сумму всех элементов массива целых...

3
Leshak
259 / 235 / 160
Регистрация: 10.12.2011
Сообщений: 513
15.03.2013, 18:23 2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Program one;
Uses crt;
var
 A: array [ 1 .. 20 ] of integer;
 i, sum: integer;
 
begin
clrscr;
randomize;
writeln('Array A:');
for i:=1 to 20 do begin
    A[i]:=random(101)+200;
    writeln(A[i],' ');
end;
 
sum:=0;
for i:=1 to 20 do begin
    if A[i] mod 2 = 3 then sum:=sum+A[i];
end;
 
writeln('Sum=',sum);
readln;
end.
1
Irina1995
1 / 1 / 0
Регистрация: 15.03.2013
Сообщений: 48
15.03.2013, 18:48  [ТС] 3
Leshak, спасибо))))))
0
Irina1995
1 / 1 / 0
Регистрация: 15.03.2013
Сообщений: 48
09.04.2013, 19:12  [ТС] 4
А можно еще алгоритм и блок-схему?
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
09.04.2013, 19:12

Найти сумму всех элементов массива целых чисел, удовлетворяющих условию: остаток от деления на 2 равен 3
Найти сумму всех элементов массива целых чисел, удовлетворяющих условию:...

Найти произведение всех элементов массива целых чисел, меньших 0
Найти произведение всех элементов массива целых чисел, меньших 0. Размерность...

Дан массив целых чисел. Найти сумму всех четных элементов стоящих на нечетных местах.
Доброго всем времени суток! Помогите с программой. Дан массив целых чисел....


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

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

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