Question

Помогите срочно!!!!!!!!!Даю 50 баллов
Написать программу, которая найдет сумму чисел, кратных 5 на интервале от 8 до 80. Паскаль

Answer 1

Program kratnii;

var a, i: integer;

begin

for i := 8 to 80 do

if (i mod 5 = 0) then

a := a + i;

Writeln(a);

end.

Answer 2

## (8..80).Where(Число -> Число.Divs(5)).Sum.Print