Darya , ответ добавлен 21.03.2018 в 15:23

Const N = 5;

var a: array [1..N] of  integer;
sum, pr: integer;

begin
sum:=0; pr:=1;
for var i:=1 to N do begin  
read(a[i]);  
if (a[i] mod 5=0) and (a[i] mod 2=0) then sum+=a[i]  
else pr*=a[i]
end;
println(sum, pr);
end.

 0