Напишите программку, которая в последовательности естественных чисел определяет сумму чисел,

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

Задать свой вопрос
Andrjuha Skatnovskij
В паскале
1 ответ
Var n, s, a,i : integer;
begin
s:= 0;
readln(n);for i:= 1 to n do
  begin
  readln(a);
  if (a mod 3 = 0) and (a mod 10 = 4) then
    s:= s + a;
  end;writeln(s);
end.
Альбина
Можешь объяснить что означает любая строка?
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт