Question

Решите задачи: 1) Введите элементы массива а[1..10] с клавиатуры и вычислите количество элементов с четными положительными значениями. 2) Составьте программу, которая заполняет массив а[1..10] случайными целыми числами в диапазоне от 1 до 20 и выводит на экран элементы, значения которых больше 5 и меньше 15.   заранее спасибо за решение.

Answer 1

1)
program test;
uses crt;
var
  arr:array[1..10] of integer;
  i,cou:integer;
begin
clrscr;
  for i:=1 to 10 do
  begin
    write('Itput arr[',i,'] ');readln(arr[i]);
    if (arr[i]>0) and (arr[i] mod 2 = 0) then cou:=cou+1;
  end;
  writeln(cou);
end.

2)Тут вообще можно 1 циклом обойтись, но так не надо заворачиваться с перетаскиванием курсора.
program test;
uses crt;
var
  arr:array[1..10] of integer;
  i:integer;
begin
  randomize;
  clrscr;
  for i:=1 to 10 do
    begin
      arr[i]:=random(20)+1;
      write(arr[i],' ');
    end;
  writeln;
  for i:=1 to 10 do
    if (arr[i]>5) and (arr[i]<15) then write(arr[i],' ');
end.

Answer 2

Конечно, я помогу вам решить эти задачи на языке программирования. Ниже представлен код на языке Python, который решает ваши задачи:

1. Вычисление количества элементов с четными положительными значениями:

pythonCopy code
# Ввод элементов массива с клавиатуры
a = []
for i in range(10):
    num = int(input(f"Введите элемент a[{i+1}]: "))
    a.append(num)

# Подсчет количества элементов с четными положительными значениями
count = 0
for num in a:
    if num > 0 and num % 2 == 0:
        count += 1

print("Количество элементов с четными положительными значениями:", count)

2. Заполнение массива случайными числами и вывод элементов, больших 5 и меньших 15:

pythonCopy code
import random

# Заполнение массива случайными числами
a = [random.randint(1, 20) for _ in range(10)]

# Вывод элементов, больших 5 и меньших 15
print("Элементы, значения которых больше 5 и меньше 15:")
for num in a:
    if 5 < num < 15:
        print(num)

Обратите внимание, что вторая задача использует модуль random для генерации случайных чисел. При запуске программы вы получите запросы на ввод элементов массива или выведены будут элементы, соответствующие условию задачи.

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