Алгоритм решения задачи.0) Начало1) S:=02) Начало цикла по i от 5 до 503) Если остаток от деления (i /5)=0 то s:=s+i; 4) Конец цикла5) Вывод S6) Конец Программа на паскале реализующая данный алгоритмProgram Summa;var s,i:integer;begin s:=0; for i:=5 to 50 do if (i mod 5)=0 then s:=s+i; writeln('Сумма первых 10 чисел которые кратны 5=',s);end.