Задать вопрос
15 июня, 05:20

В массиве А (20) случайных целых чисел (диапазон чисел [-10 ... 30]) определить количество нечетных чисел

+3
Ответы (1)
  1. 15 июня, 07:17
    0
    Var a: array [1 ... 20] of integer; i, s: integer;

    begin

    randomize;

    s : = 0;

    for i : = 1 to 20 do

    a[i] : = random (40) - 10;

    for i : = 1 to 20 do

    begin

    write (a[i], ' ') ;

    if (a[i] + 10) mod 2 = 1

    then

    s : = s + 1;

    end;

    writeln () ;

    writeln (s) ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «В массиве А (20) случайных целых чисел (диапазон чисел [-10 ... 30]) определить количество нечетных чисел ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
1. В массиве А (11) случайных целых чисел (диапазон чисел [-10 ... 25]) определить: сумму элементов, которые кратны 5. 2. В массиве B (6) случайных целых чисел (диапазон чисел [-4 ... 53]) определить: количество элементов, которые меньше 7.
Ответы (1)
1. for + random a. вывести случайное количество случайных чисел b. вывести на экран 10 случайных чисел c. вывести на экран 10 случайных чисел, значение которых лежит в отрезке [0,10] d.
Ответы (1)
Ответьте в кумире или Паскале 1. Найти среднее арифметическое значений всех элементов массива, состоящего их случайных положительных чисел. 2. В массиве из 15-ти целых случайных чисел из диапазона [-30; 70] найти минимальный положительный элемент. 3.
Ответы (1)
В массиве В (12) случайных целых чисел (диапазон чисел [ - 5 ... 60]) определить: а) сумму элементов б) количество элементов, которые меньше 7
Ответы (1)
Помогите решить задачи на паскаль. 1) Дан массив случайных чисел (количество элементов вводите с клавиатуры). Найти произведение всех элементов массива. 2) Дан массив случайных чисел (количество элементов вводите с клавиатуры).
Ответы (1)