Напишите программу,которая для заданной последовательности натуральных чисел подсчитывает сумму входящих в неё трехзначных чисел,которые делятся на 7.программа получает на вход кол-во чисел в прследовательности, а затем сами числа.кол-во чисел не превышает 1000.введенные числа не превышают 30 000.программа должна вести одно число-сумму трехзначных чисел,находящихся в заданной последовательности натуральных чисел.
Настя25112005
2
01.09.2019 21:00
4
Другие вопросы по теме Информатика
kirilos2014
25.05.2020 12:24
прррррррррррррря
25.05.2020 12:23
rasgramorysergio5775
25.05.2020 12:23
Superclassehdh
25.05.2020 12:24
enindanila24
25.05.2020 12:27
Ришат12333323
21.04.2020 19:18
SOSmi
21.04.2020 19:18
marmurinajulia
21.04.2020 19:19
Популярные вопросы
- Е: (6400-6393)=8500 (119+р): 8=765 решите уровнения...
2 - Написать рассказ по теме развлечения в моём городе...
2 - Напиши морфологический разбор слов: искал, (для) этюдов, хороших ,он....
3 - Сравнить (больше,меньше или равны) силы взаимодействия двух точечных зарядов...
3 - Разделите эти слова на женский и мужской род *трубач,вещь,ночь,грач,дочь,клещ,меч,обруч,врач,мышь,овощ,,брошь,ключ,глушь....
2 - Разбить на словосочетания предложение: молодой кедр вырос высоко в горах....
2 - Описати кішку повинні буті зачин основна частина кінцівка...
2 - Поставь ударение.сколько слогов вслове -чан.чебурек .чулан .бабочка .свеча...
2 - Как перевести 300 грамм в килограммы ?...
3 - Всосуде было 5 куб. см воды. какой уровень воды будет после того, как...
1
var n,x,i,s: longint;
begin
s:=0;
read (n);
for i:=1 to n do;
begin
read (x);
if (x > 99) and (x < 1000) and (x mod 7 = 0) then s:=s+x;
end;
write (s);
end.