Составить программу вычисления суммы двузначных чисел, которые делятся на 13. Составить в... Составить программу вычисления суммы двузначных чисел, которые делятся на 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 умножить?
program SumOfNumbersDivisibleBy13;
var
sum, i: integer;
begin
sum := 0;
for i := 1 to 7 do
begin
sum := sum + i;
end;
sum := sum * 13;
writeln('Сумма двузначных чисел, которые делятся на 13: ', sum);
end.