• Дан массив из n элементов целого типа. Определить количество элементов, кратных a

Ответы 2

  • спасибо
    • Автор:

      smoke14
    • 6 лет назад
    • 0
  • const n=10;var ar:array[1..n] of integer;a,k,i:integer;beginRandomize;for i:=1 to n do  begin ar[i]:=random(20)+1; write(ar[i]:3); end;writeln;write('a = ');readln(a);k:=0;for  i:=1 to n do  if ar[i] mod a = 0 then k:=k+1;writeln('k = ',k);end.Пример: 15  2 20 13 12  2  7 14  2  4a = 3k = 2
    • Автор:

      whitehead
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years