0 / 0 / 0
Регистрация: 29.12.2010
Сообщений: 5
1

Найти количество и сумму тех членов данной последовательности, которые делятся на 5 и не делятся на 7

29.12.2010, 17:36. Показов 8012. Ответов 2
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Даны натуральное число n, целые числа a1,...an.Найти количество и сумму тех членов данной последовательности,которые делятся на 5 и не делятся на 7 !!! решите плз на паскале!!!
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
29.12.2010, 17:36
Ответы с готовыми решениями:

Найти количество и сумму тех членов последовательности, которые делятся на 5, но не делятся на 7
1.Дан массив из n чисел. Найти количество и сумму тех членов последовательности, которые делятся на...

Найти количество и сумму членов последовательности, которые делятся на 5 и не делятся на 7
Задано натуральное число n, целые числа a1...,an. Найти количество и сумму тех членов заданной...

Найти количество и сумму тех элементов таблицы, делятся на 5 и не делятся на 7
Здравствуйте, нужна помощь в решения задачи: 1. Original 1. Rus (Задача по теме Процедуры...

Найти сумму тех чисел, которые делятся на 5 или на 7
Помогите решить наработки есть.Даны натуральные числа от 1 до 50.Найти сумму тех из них которые...

2
42 / 42 / 14
Регистрация: 29.12.2010
Сообщений: 159
30.12.2010, 10:03 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
program qwerty;
var n,sum,i,count: integer;
    a: array[1..30000] of integer;
begin
writeln('Enter N:');
readln(n);
writeln('Enter a1,a2,a3,...,an:');
count:=0;
sum:=0;
for i:=1 to n do
begin
 readln(a[i]);
 if (a[i] mod 5=0) and (a[i] mod 7<>0) then
  begin
   count:=count+1;
   sum:=sum+a[i]
  end;
end;
writeln('Count=',count);
writeln('Summa takih 4isel=',sum);
readln;
end.
0
0 / 0 / 0
Регистрация: 07.11.2012
Сообщений: 3
11.11.2012, 11:38 3
а можно эту задачу в vfp?
0
11.11.2012, 11:38
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
11.11.2012, 11:38
Помогаю со студенческими работами здесь

Даны натуральные числа от 1 до 50. Найти сумму тех из них, которые делятся на 5 или на 7
Заранее спасибо!!

Даны натуральные числа от 1 до 50. Найти сумму тех из них, которые делятся на 5 или на 7.
желательно в трех вариантах с предпроверкой и постпроверкой

Даны натуральные числа от 1 до 50. Найти сумму тех из них, которые делятся на 5 или на 7.
Даны натуральные числа от 1 до 50. Найти сумму тех из них, которые делятся на 5 или на 7.

Получить сумму тех членов данной последовательности,которые нечетные и отрицательные
Даны целые числа А1...А20.Получить сумму тех членов данной последовательности,которые нечетные и...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru