• Вычислить сумму натуральных чисел,кратных 3,меньшую 100.


    Паскаль

Ответы 2

  • 1. Отформатируйте код. 2. Ваша задача дает результат 1683, что существенно превышает 100.
  • Минимальное число, кратное 3 - это само число 3. А дальше увеличиваем числа на 3...// PascalABC.NET 3.2, сборка 1381 от 04.02.2017// Внимание! Если программа не работает, обновите версию!begin  var n:=3;  var s:=0;  repeat    s+=n;    if s>=100 then begin s-=n; break end    else      if n<>3 then Write('+',n) else Write(n);    n+=3  until false;  Writeln('=',s)end.Результат3+6+9+12+15+18+21=84
    • Автор:

      starrrcrq
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years