Статистика
Всего в нашей базе более 4 327 664 вопросов и 6 445 979 ответов!

Дан массив Аn определить количество нечетных элементов массива, стоящих на четных местах вывести на экран исходный массив и найденное количество

10-11 класс

помогите

Adolfhitler 11 марта 2016 г., 2:15:34 (8 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
настя0990
11 марта 2016 г., 4:23:49 (8 лет назад)

const n = 15;
var
  a: array[1..n] of integer;
  i, count: integer;
begin
  for i := 1 to n do begin
    a[i] := random(100);
    write(a[i], ' ');
    if(i mod 2 = 0) and (a[i] mod 2 <> 0) then inc(count);
  end;
  writeln;
  writeln('[', count, ']');
end.

Ответить

Другие вопросы из категории

Читайте также

Помогите пожалуйста с задачками))) Pascal

1) Найти сумму всех элементов массива, заполненных случайными числами?
2) Найти сумму четных элементов массива?
3) Найти сумму элементов массива, стоящих на четных местах?

ЗАДАЧА В ПАСКАЛЕ дана непустая последовательность целых чисел оканчивающаяся нулем.найти: а) наибольшее число б) разность

максимального и минимального

в) максимальный элемент из стоящих на четных местах

г) сумму положительных и среднее арифметическое отрицательных

д) второй максимум

е) длину наибольшего фрагмента, состоящего из одинаковых элементов.

ЗАРАНЕЕ ОГРОМНОЕ СПАСИБО ЗА РЕШЕНИЕ ХОТЯ БЫ ОДНОЙ ИЗ ЗАДАЧЕК...))))))



Вы находитесь на странице вопроса "Дан массив Аn определить количество нечетных элементов массива, стоящих на четных местах вывести на экран исходный массив и найденное количество", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.