Question

Составьте программу ввода массива s [1..8] с клавиатуры и вывода элементов больше 5.

Answer 1

var a : array [1..8] of byte;
begin  for var i := 1 to 8 do begin
    write(i, ':'); readln(a[i]);
  end;
  for var i := 1 to 8 do
    if a[i] > 5 then writeln(a[i]);
end.

Answer 2

Программа будет состоять из следующих шагов:

1. Создадим пустой массив s длиной 8 элементов.

2. С помощью цикла заполним массив s значениями, введенными с клавиатуры. Для этого будем просить пользователя ввести каждый элемент массива с помощью функции input(). Значения будут приведены к целочисленному типу с помощью функции int().

s = []
for i in range(8):
    element = int(input("Введите элемент массива: "))
    s.append(element)

3. Создадим пустой массив result, в который будем добавлять элементы массива s, которые больше 5.

4. С помощью цикла пройдемся по каждому элементу массива s. Если элемент больше 5, добавим его в массив result.

result = []
for element in s:
    if element > 5:
        result.append(element)

5. Выведем элементы массива result с помощью цикла.

for element in result:
    print(element)

Полная программа будет выглядеть следующим образом:

s = []
for i in range(8):
    element = int(input("Введите элемент массива: "))
    s.append(element)

result = []
for element in s:
    if element > 5:
        result.append(element)

for element in result:
    print(element)

Теперь пользователь сможет ввести 8 значений с клавиатуры, а программа выведет только те из них, которые больше 5.