Question

Дан массив из 7 чисел найти количество элементов кратных 5 и сумму четных чисел массива решить в паскале

Answer 1

Ответ:

если у тебе есть Паскаль,то проверь обязательно

Объяснение:

var

a:array[1..20] of integer;

i,n,k,l:integer;

begin

k:=0;

l:=0;

n:=7;

For i:=1 to n do

read(a[i]);

for i:=1 to n do begin

If a[i] mod 5=0 then inc(k);

If a[i] mod 2=0 then l:=l+a[i];

end;

for i:=1 to n do

write('кратных 5=', k, 'сумма чётных=' , l);

end.

ЭТО НЕ ПИШИ:

смотри mod это остаток от деления,и понятно,что если число кратно 2 то в остатке у него должно быть 0,и также у кратных 5 ,inc это функция которая прибавляет 1 к начальному значению