чтобы отбросить ответы с окончанием "0", нужно посмотреть четно разделившееся числ или нет.
правда можно было и a[i] проверить на четность. ступил.

только там нужно ((a[i] div 5) mod 2=1)
я поправил в том сообщении.
вот так)

Добавлено (2010-05-10, 9:37 PM)
---------------------------------------------
Дан целочисленный массив из 30 элементов. Элементы массива могут
принимать значения от -10000 до 10000. Опишите на русском языке или
на одном из языков программирования алгоритм, который подсчитывает
и выводит среднее арифметическое элементов массива, оканчивающихся
на цифру 5. Гарантируется, что в исходном массиве есть хотя бы один
такой элемент.

const
N=30;
var
a: array [1..N] of integer;
i, x, y: integer;
s: real;
begin
for i:=1 to N do readln(a[i]);
x:=0;
y:=0;
s:=0;
for i:=1 to N do begin
if (a[i] mod 10 = 5) then begin
x:=x+a[i]
y:=y+1
s:=x/y;
writeln(s);
end;
end;
end.

Добавлено (2010-05-10, 9:40 PM)
---------------------------------------------
это оптимальный вариант, ИМХО

Варианты ЕГЭ 2026 Дальний Восток
Егэ Дальний Восток 2026

Добавлено (2010-05-10, 9:51 PM)
---------------------------------------------
http://forum.postupim.ru/forum/32-7457-1 - ЕГЭ информатика.

Добавлено (2010-05-11, 0:46 Am)
---------------------------------------------
Вар 321

Добавлено (2010-05-11, 7:34 PM)
---------------------------------------------
Что-то в этих вариантах однотипное А1 да и другие задания
в этом году другое наверно будет

Варианты ЕГЭ 2026 Дальний Восток
Егэ Дальний Восток 2026