Составить программку вычисления суммы двузначных чисел, которые делятся на 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 помножить?
1 ответ

Var i: Integer, sum: Integer;

Begin

 for i := 13 to 99 do

   if (mod(i, 13) = 0)

     sum := sum + i;

 write( sum );

end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт