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

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

Задать свой вопрос
Степан Штурцев
программка обязана инспектировать правильность ввода данных юзером?
Вовка Шанецкий
вроде нет
1 ответ

var n, a, s : integer;

begin

   write('количество чисел: ');

   readln(n);

   write('ввести числа: ');

   for var i := 1 to n  do begin

       read(a);

       if a mod 10 = 4 then s+= a

   end;

   writeln;

   writeln(s);

end.

, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт