2 мая, 09:54

Сформировать массив из 15 целых чисел случайным образом на отрезке от 2 до 15. Найти произведение последних 6 элементов

+3
Ответы (1)
  1. 2 мая, 10:35
    0
    Var

    a:array[1 ... 15] of integer;

    i, k:integer;

    begin

    k:=0;

    for i:=1 to 15 do

    begin

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

    writeln (a[, i,]=, a[i]);

    if a[i] mod 2 0 then k:=k+1

    end;

    writeln;

    writeln (Kol-vo nechetnih chisel =, k);

    end.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Сформировать массив из 15 целых чисел случайным образом на отрезке от 2 до 15. Найти произведение последних 6 элементов ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы