Дан массив C (17). Определить кол во элементов кратного 11

Question

Информатика

Тая

23 мая, 20:47

Дан массив C (17). Определить кол во элементов кратного 11

+5

Ответы (1)

Знаете ответ на вопрос?

Иоланта · Answer 1

Var c:array[1 ... 17] of integer;

i, k:integer;

begin

for i:=1 to 17 do read (c[i]) ;

k:=0;

for i:=1 to 17 do

if c[i] mod 11 = 0 then k:=k+1;

writeln ('Количество элементов кратных 11 = ', k) ;

end.