• программа которая вычесляет массив b(1..8) случайными целыми числами в диапозоне от 1 до 10 и находит количество элементов с нечётными значениями

Ответы 1

  • var a:array[1..100] of integer;i,s:integer;beginfor i:=1 to 8 do begina[i]:=random(11)-0;write(a[i]:4);end;s:=0;for i:=1 to 8 do beginif a[i] mod 2<>0 then s:=s+1;end;writeln;writeln(s);end.
    • Автор:

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

Еще вопросы

Войти через Google

или

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

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

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