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

Question

Информатика

Михаил

5 июля, 01:53

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

+4

Ответы (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.