Вычислите сумму всех элементов массива,исключая элементы кратные 5.На языке Паскаль.

Спасибо.Можешь с алгеброй еще помочь?

https://znanija.com/task/23623337

Program n1;var a: array[1..10] of integer;i: integer;sum: real;beginrandomize;sum:=0;for i:=1 to 10 do begina[i]:=random(21)-10;write(a[i],' ');if a[i] mod 5<>0 then sum:=sum+a[i];end;writeln;write(sum);end.