Нужно написать программу. 1.дан массив чисел ,найти сумму элементов больше 10 и меньше 20
mary30092004
3
11.09.2019 09:10
0
Другие вопросы по теме Информатика
yanakrl1
11.05.2021 12:23
gusarova17
11.05.2021 12:23
010Dasha010
11.05.2021 12:26
marina999mmm
11.08.2019 20:40
alinaislam371
11.08.2019 20:40
саранчаа9
13.07.2019 02:20
ГригорийСвинатович13
13.07.2019 02:20
друг32
13.07.2019 02:20
regina290402
27.08.2019 07:00
Популярные вопросы
- не могу решить даю если можно то с решением не ответ)...
1 - Реакция возможна:а) при нагреванииб) только при освещениив) без...
2 - При прийнятті на висоту 2м воно набуло енергію 1200Дж .Визначити...
3 - Прочитай отрывок из биографии А. Айымбетова.Айдын Аимбетов - казахский...
1 - Поработайте с текстом на с. 123 учебника, составьте план по тексту...
3 - Составь математическую модель по словесной.Бабушка разводит кур...
3 - Решите хотя бы первое и второе....
3 - И.Уханов оренбургский пуховой платок - описание оригинального...
3 - Решить задачу А) если их ежемесячные расходы составят 50 тыс ....
2 - Даны два прилежащих угла АОВ и ВОD, сумма которых равна 250 градусов,...
1
var a:array[1..N] of integer;
s,K:integer;
begin
readln(K);
for i:=1 to N do readln(a[i]);
for i:=1 to N do
if (a[i] mod K=0) then s:=s+a[i];
write(s);
end.