Question

С клавиатуры вводятся целые числа. Признаком конца ввода чисел является 0. изменить знак отрицательных чисел на положительный. Результаты вывести на экран.

Answer 1

uses
  System.Collections.Generic;
var
  a: List<integer> := new List<integer>(); //Объявляем и создаём динамический массив
  i: integer;
begin
  repeat
    readln(i);
    if (i = 0) then
      break
    else
      a.Add(i);
  until (False); //Прекращаем цикл, когда рак (break) в цикле свиснет (False можно заменить на "2 + 2 = 5"
  
  writeln(#13); //Вставляем 2 пустые строки
  
  foreach i in a do //Выводим исходный массив
    write(i, ' '); 
  
  writeln();
  
  foreach i in a do //Выводим конечные числа, нет задачи массив изменять
    write(abs(i), ' '); 
end.

Answer 2

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

Вот пример кода на языке Python, который решает данную задачу:

numbers = []  # Создаем пустой список для хранения введенных чисел

# Ввод чисел с клавиатуры
while True:
    num = int(input("Введите число (для завершения введите 0): "))
    if num == 0:
        break
    numbers.append(num)

# Изменение знака отрицательных чисел на положительный
for i in range(len(numbers)):
    if numbers[i] < 0:
        numbers[i] = abs(numbers[i])  # Используем функцию abs() для получения модуля числа

# Вывод результатов
print("Результаты:")
for num in numbers:
    print(num)

При запуске данного кода, программа будет просить ввести числа с клавиатуры до тех пор, пока не будет введено число 0. Затем программа изменит знак отрицательных чисел на положительный и выведет результаты на экран.

Например, если мы введем числа -5, 10, -3, 0, то на экран будет выведено: ``` Результаты: 5 10 3 ```