Question

4. Вывести на экран только те элементы массива, которые меньше 5, элементы массива заданы случайным образом. var а:array [1..10] of integer; i:integer; begin for……begin a[i]:=…(10); write (a[........]:3); end; writeln; writeln ('новый массив'); end. Помогите,пожалуйста!

Answer 1

Pascal

var

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

 i:integer;

begin

 randomize;  

 for i:=1 to 10 do begin

   a[i]:=random(10);

   write(a[i]:3);

 end;

 writeln;

 for i:=1 to 10 do

   if a[i]<5 then

     write(a[i]:3);

end.

Answer 2

Для вывода на экран только тех элементов массива, которые меньше 5, вам потребуется использовать цикл и условную конструкцию. Вот пример кода на языке Pascal, который решает данную задачу:

var
  a: array [1..10] of integer;
  i: integer;
begin
  randomize; // Инициализация генератора случайных чисел

// Заполнение массива случайными числами
  for i := 1 to 10 do
    a[i] := random(10); // Генерация случайного числа от 0 до 9

// Вывод элементов массива, меньших 5
  writeln('Элементы массива, меньшие 5:');
  for i := 1 to 10 do
  begin
    if a[i] < 5 then
      write(a[i]:3);
  end;

writeln;
  writeln('Новый массив');
end.

В этом коде мы используем цикл `for` для заполнения массива `a` случайными числами от 0 до 9 с помощью функции `random`. Затем мы используем еще один цикл `for` для вывода только тех элементов массива, которые меньше 5, с помощью условной конструкции `if`. Выводимые элементы разделены пробелами и выровнены по ширине 3 символа с помощью форматирования `:3`.

Примечание: Ваш код содержит некоторые недостающие части, поэтому я предоставил вам полный пример, который можно выполнить. Если у вас есть конкретные вопросы или требования, пожалуйста, уточните их, и я с радостью помогу вам.