Задача №5.

Дан целочисленный массив из 30 элементов. Элементы массива могут принимать значения от -1000 до 1000. Опишите на русском языке или на одном из языков программирования алгоритм, который позволяет подсчитать и вывести среднее арифметическое среди rex элементов массива, которые делятся на 3, но не делятся на 5. Гарантируется, что в исходном массиве есть хотя бы один такой элемент.

Исходные данные объявлены так, как показано ниже. Запрещается использовать переменные, не описанные ниже, но разрешается не использовать часть из них.

Паскаль	Бейсик	Си	Естественный язык
const N=30; var a: array (1..N) of integer; i, x, у: integer; s: real; begin for i:=l to N do readln(a[i]); ......... end.	N=30 DIM A(N)  AS INTEGER DIM I,  X,   Y AS INTEGER DIM S AS SINGLE FOR I = 1 TO N INPUT A(I) NEXT I ........ END	#include <stdio.h> #define N 30 void main(void) {int a[N] ; int i,  x, y; float s; for (i=0; i<N; i++) scanf("%d", &a(i]); ..... }	Объявляем массив А из 30 элементов. Объявляем   целочисленные переменные I, X, Y. Объявляем вещественную переменную S. В цикле от 1 до 30 вводим элементы массива А с 1-го по 30-й. ......

В качестве ответа Вам необходимо привести фрагмент программы (или описание алгоритма на естественном языке), который должен находиться на месте многоточия. Вы можете записать решение также на другом языке программирования (укажите название и используемую версию языка программирования, например, Borland Pascal 7.0) или в виде блок-схемы. В этом случае вы должны использовать переменные, аналогичные переменным, используемым в алгоритме, записанном на естественном языке, с учетом синтаксиса и особенностей используемого вами языка программирования.

Решение задачи №5.

Паскаль

x:=0; y:=0; for i:=1 to N do if (a[i] mod 3 = 0) and (a[i] mod 5 <>0) then begin x:=x+a[i]; y:=y+1; end; s:=x/y; write(s);

Алгоритм решения задачи

Задаем цикл от 1 до 30, в котором проверяем делится ли элемент массива на 3 и не делится на 5 с  помощью функции mod (получение остатка от целочисленного деления). Считаем сколько таких элементов в массиве и сумму этих элементов, далее находим среднее арифметическое.
Возврат к списку задач