• Даны натуральные числа от 1 до 50. Найти сумму тех из них, которые делятся на 5 или на 7.ПАСКАЛЬ
    ПОМОГИТЕ ПОЖАЛУЙСТА!!!

Ответы 2

  • Если не будет работать - отпиши, я скрин программы скину, мог удалить случайно что-то при переносе
    • Автор:

      coryifax
    • 6 лет назад
    • 0
  • Program sadadasf;var i,k: integer;begink:=0;For i:=1 to 50 doIf (i mod 5=0) or (i mod 7=0) then k:=k+i;Writeln('Сумма этих чисел: ',k);end.
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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