Составить программу вычисления суммы двузначных чисел, которые делятся на 13. Составить в паскале
На 13 делятся только 13, 13х2=26, 13х3=39, 13х4=52, 13х5=65, 13х6=78, 13х7=91. Их сумма это 13х(1+2+3+...+7)=13х28=364. И какая программа нужна? 1+2+3+...+7 сложить и на 13 умножить?
Var i: Integer, sum: Integer;
Begin
for i := 13 to 99 do
if (mod(i, 13) = 0)
sum := sum + i;
write( sum );
end.