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

Ответы 1

  • Предложу решение, основанное на том, что понял из текста) var a: integer;beginwriteln('Вводите числа'); a:=1;while a<>0 do beginreadln(a);if a<0 then writeln('Противоположное число ',abs(a));end;readlnend.Можно их в массив записывать, если нужно вывести красиво.
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years