Question

Задан массив вещественных чисел от 0 до 20. Отрицательные числа заменить их модулями , а положительные округлить до целых.

Answer 1

PascalABC.NET 3.4.2, сборка 1884 от 24.11.2018

Внимание! Если программа не работает, обновите версию!

begin

 var a := SeqRandomReal(ReadInteger('n='), 0, 20)

     .Select(t -> Round(t, 2)).ToArray;

 a.Println;

 a.Transform(t -> t < 0 ? Abs(t) : Round(t));

 a.Println

end.

Пример

n= 12

17 13.27 2.31 5.23 1.45 12.1 18.75 4.51 0.22 14.06 9.18 19.06

17 13 2 5 1 12 19 5 0 14 9 19

Answer 2

//PascalABC.NET v3.3 1633

const n = 10;

var arr: array [1..n] of real;

begin

 var min:=0;

 var max:=20;

 for var i:=1 to n do

   arr[i]:=random()*(max - min) + min;

 writeln('Исходный массив:');

 arr.PrintLn(', ');

 

 for var i:=1 to n do

   if arr[i] < 0 then

     arr[i]:=Abs(arr[i])

   else

     arr[i]:=Round(arr[i]);

 

  writeln('Конечный массив:');

  arr.Print(', ');

end.

Answer 3

Для решения этой задачи вам потребуется пройти по всему массиву и для каждого элемента проверить, является ли он отрицательным или положительным. Если число отрицательное, замените его на его модуль. Если число положительное, округлите его до ближайшего целого числа.

Вот пример кода на языке Python, который выполняет это:

import math

# предположим, что у нас есть массив чисел
numbers = [-5.7, -3.2, 0.5, 2.3, 3.8, -1.9, 5.6, -4.7, 6.8, -2.1]

# проходим по каждому элементу массива
for i in range(len(numbers)):
   # если число отрицательное, заменяем его на модуль
   if numbers[i] < 0:
       numbers[i] = abs(numbers[i])
   # если число положительное, округляем его до ближайшего целого числа
   else:
       numbers[i] = math.floor(numbers[i] + 0.5)

print(numbers)

В этом коде мы используем функцию `abs()` для получения модуля числа и функцию `math.floor()` для округления числа до ближайшего целого числа. Обратите внимание, что `math.floor()` округляет число вниз, поэтому мы добавляем 0.5 к числу перед округлением, чтобы получить обычное округление до ближайшего целого числа.

Этот код изменит исходный массив `numbers`, заменяя отрицательные числа на их модули и округляя положительные числа до ближайших целых чисел.