• Кто разбирается? Короче, такая хрень, помогите пожалуйста! Составьте программу, которая формирует массив из шестнадцати случайных целых чисел от -20 до 20 и: а) находит элементы с нулевыми знаниями; б) находит индексы нечетных элементов; в) подсчитывает количество положительных элементов. -Ну? Кто тут умный?

Ответы 3

  • Pascal abc
  • Дополнил ответ
  • На каком языке программирования?Паскаль АБСvar i,count:integer;a:array [1..16] of integer;beginfor i:=1 to 16 do begina[i]:= Random (-20,20);end;for i:=1 to 16 do beginif (a[i] = 0) thenwriteln ('Нулевой элемент ',a [i]);if (a [i] mod 2 = 1) thenwriteln ('Индекс нечетного элемента ',i);if (a [i] >0) theninc (count);end;writeln ('Количество положительных чисел ',count);end.
  • Добавить свой ответ

Войти через Google

или

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

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

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