Question

СРОЧНО!!!!!Дам 20 баллов!!!!Составить программу ввода с клавиатурой целых чисел от 1 до 10 и вывода на экран элементов массива с нечетными значениями

Answer 1

Program pr_1;var e: array [1..10] of integer;    i: integer;beginfor i := 1 to 10 do    e[i] := random(1, 10);for i:= 1 to 10 do    if e[i] mod 2 <> 0 then writeln(e[i]);end.

Answer 2

Var
a:array[1..10]of integer;
i:integer;
Begin
For i:= 1 to 10 do
  begin
    Read(a[i]);
    if a[i] mod 2 <>0 then Write(a[i], ' ');
  end;
end.

/~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~/

//Более современное решение
// PascalABC.NET 3.3, сборка 1576 от 16.11.2017
// Внимание! Если программа не работает, обновите версию!


Begin
var a:= ReadlnString('Введите массив').ToIntegers;
SetLength(a, 10);
a.Where(t->t.isOdd).Println;
end.

Answer 3

Конечно, я готов помочь! Вот программа на языке Python, которая запрашивает у пользователя 10 целых чисел от 1 до 10 и выводит на экран только нечетные значения:

pythonCopy code
array = []  # создаем пустой массив для хранения чисел

# запрашиваем 10 чисел от пользователя и добавляем их в массив
for i in range(10):
    num = int(input("Введите число от 1 до 10: "))
    if num >= 1 and num <= 10:
        array.append(num)
    else:
        print("Число должно быть от 1 до 10")

# выводим на экран только нечетные значения массива
print("Нечетные значения массива:")
for num in array:
    if num % 2 != 0:
        print(num)

Сначала мы создаем пустой массив array, затем запрашиваем у пользователя 10 целых чисел в цикле for. Если число находится в диапазоне от 1 до 10, оно добавляется в массив с помощью метода append(). Если число находится вне этого диапазона, программа сообщает об этом и запрашивает следующее число.

Затем мы выводим только нечетные значения массива на экран с помощью второго цикла for и оператора %, который возвращает остаток от деления числа на 2. Если остаток не равен 0, значит, число нечетное, и оно выводится на экран.

Надеюсь, это помогло вам! Если у вас есть какие-либо вопросы, не стесняйтесь задавать их.