дан массив из n чисел найти сумму тех чисел у которых нечетный индехс и числа кратны 5 или 3
5-9 класс
|
var a:array[1..100000] of integer;
s,i,n:integer;
begin
readln(n);
for i:=1 to n do begin
read(a[i]);
if (i mod 2 <> 0) and ((a[i] mod 5 = 0) or (a[i] mod 3 = 0)) then s+=a[i];
end;
writeln(s);
end.
Другие вопросы из категории
дебри,прения,игры,шахматы
ножницы,дрожжи щипцы башмаки
горе нагорный горевать горемыка
если буква «а» встречается чаще, чем буква «в», и напечатать false
Читайте также
2). Дан массив из n элементов. Написать программу подсчитывающую произведение элементов массива.
2)Дан массив целых чисел.Найти сумму четных положительных чисел, стоящих на нечетных местах и количество отрицательных элементов, стоящих на четных местах.
3)дан массив целых чисел.найти сумму четных и положительных элементов, расположенных до первого отрицательного элемента.Примечание:при вводе необходимо учесть, что первый элемент не может быть отрицательным.
таких членов.
2.Дан массив из 10 элементов. Найти количество элементов с четными индексами.
3.Дан массив из 10 элементов. Найти наибольший элемент массива.