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

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

Задать свой вопрос
1 ответ
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.
Danka Prihodkin
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.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт