< >

ПОМОГИТЕ! • ПАСКАЛЬ!

Приложения:

Ответы

Ответ дал: defendercryak
0

Ответ:

var a:array[1..100] of integer;

i,s,n:integer;

begin

s:=0;

readln(n);

for i:=1 to n do

read(a[i]);

for i:=1 to n do

if (a[i] mod 6=0) then

s := s + a[i];

writeln(s);

end.

Похожие вопросы
Литература
1 год назад
Помогите пожалуйста 3 класс 4 часть в рабочей тетради страница 39 номер 2 и 3
Математика
1 год назад
По круговой диаграмме определи массу меди, если масса никеля составляет 6 кг. Можно хороший ответ? +60 ballov
Математика
1 год назад
492. 1) 13 бөлшегінің бөлімін өзгертпей, одан: 2 есе, 3 есе, 4 есе, - 3 6 есе кіші бөлшектерді жазыңдар. 5 2) - бөлшегінің алымын өзгертпей, одан 2 есе, 4 есе, 8 есе 24 үлкен бөлшектерді
География
1 год назад
помогите пожалуйста умоляюю дам 100 баллов
Физика
2 года назад
Хелп энергии. Определите его массу.​
Химия
2 года назад
20 БАЛЛОВ! Какой объем оксида серы SO2 образуется при полном сжигании серы, если на это потребовалось 4моль кислорода? Для расчета применяем Закон Авогадро. Уравнение химической реакции горения серы
Математика
8 лет назад
42m+15+13 вычислить удобным способом
Химия
8 лет назад
На новогодние праздники были вырублены елки с площади 20 га. Какой объем кислорода могли выделить эти деревья в течение года? (В среднем 1 га хвойного леса выделяет 7000 л кислорода в сутки.) На