дан целочисленый массив из 75 частей.элементы массива могут принимать значения от

Дан целочисленый массив из 75 элементов.элементы массива могут принимать значения от 1000 до 1000.составьте программку,которая обретает и выводит среднее арифметическое всех элементов массива,заканчивающихся цифров 5

Задать свой вопрос
1 ответ

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.

Albina Pelezneva
поёдёт должно в конче быть но я поставил в середину
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт