Дано 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.