ЖИЗНЕННОЙ, СИТУАЦИИ, ПОНАДОБЯТСЯ, ВЫЧИСЛИТЕЛЬНЫЕ Будешь писать неграмотно лично я и отвечать не буду - обидно за русский язык!! Вычислительными будем называть такие таблицы, в которых значения некоторых свойств вычисляются с использованием значений других свойств из этой же таблицы. Вычислительная таблица может содержать итоговую строку (графу). Итоговая строка (графа) имеет заголовок «Итого» или «Всего». В ячейках итоговой строки (графы) размещают суммы чисел из соответствующих граф (строк). Важно, чтобы эти суммы имели смысл.
Объяснение:
var sum2,kol5,n,m:integer;
massiv:array[1..1000] of integer;
begin
readln(n); kol5:=0; sum2:=0;
for m:=1 to n do readln(massiv[m]);
for m:=1 to n do if(massiv[m] mod 5=0) then kol5:=kol5+1;
for m:=1 to n do if(m mod 2=0) then sum2:=sum2+massiv[m];
writeln(kol5,' ',sum2);
readln; end.