Регистрация
alenadasha80
05.04.2020 10:22
Информатика
Есть ответ 👍

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

138
266
Посмотреть ответы 1

Ответы на вопрос:

zaharovivan150
zaharovivan150
4,8(37 оценок)

var

n,count,i: integer;

begin

count: =0;

readln(n);

for i: =1 to n do

  begin

    readln(n);

    if (n mod 4 = 0) and (n mod 7 < > 0) then

      inc(count);

  end;

writeln(count);

end.

Популярно: Информатика