даны целые числа а1,...а50. получить сумму тех чисел которые кратны 5

Анастасия Строгая
даны целые числа а1,...а50. получить сумму тех чисел которые кратны 5
Помогите составить циклический алгоритм

Ответы:

Ли Си Цин
сумма := 0 цикл по индексу от 1 до 50 если элемента массива кратен 5, то прибавить его к сумме вывести сумму

Krab Bark
program p1; var s:longint; a:integer; begin s:=0; for i:=1 to 50 do begin read(a); if a mod 5=0 then s:=s+a end; writeln(s) end. Только при чем тут web-дизайн?