Дано 20 целых чисел: 13,14,15,...32. Напишите программу для вычисления и вывода на экран суммы только тех чисел, которые делятся без остатка на 8( кратны восьми).

//PascalABC.NET (версия 3.1, сборка 1196 от 09.03.2016)begin  var s:=0;  for var i:=13 to 32 do if i mod 8 =0 then s:=s+i;     println('Сумма кратных 8:',s);end.