• Напишите программу, которая в последовательности натуральных чисел определяет сумму чисел, кратных 3 и оканчивающихся на 4. Программа получает на вход количество чисел в последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 3 и оканчивающееся на 4. Количество чисел не превышает 100. Введённые числа по модулю не превышают 300. Программа должна вывести одно число: сумму чисел, кратных 3 и оканчивающихся на 4.

Ответы 2

  • Program DZ;var s,i,n,x:longint;begin s:=0; read (n); for i:=1 to n do begin read (x); if (x mod 3=0) and (x mod 10=4) then s:=s+x; end; write (s);end.
    • Автор:

      hughes
    • 5 лет назад
    • 0
  • Program DZ;var s,i,n,x:longint;begin  s:=0;  read (n);  for i:=1 to n do    begin      read (x);      if (x mod 3=0) and (x mod 10=4) then s:=s+x;    end;  write (s);end.
    • Автор:

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

Еще вопросы

Войти через Google

или

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

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

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