Дан целочисленный массив из 30 элементов. элементы массива могут принимать значения от –1000 до 1000. опишите на языке или на одном из языков программирования алгоритм, который находит и выводит среднее арифметическое всех элементов массива, оканчивающихся цифрой 5. гарантируется, что хотя бы один такое элемент в массиве есть. народ
program massiv;
uses CRT;
const N=30;
var i,S:integer;
K:real;
a:array [1..N] of integer;
begin
for i:=1 to N do
begin
read a[i];
end;
for i:=1 to N do
begin
if a[i] mod 10 =5
then
S:=S+a[i];
K:=K+1;
end;
write(S/K);
readkey;
end.