Даны два числа х и у.Если х и у отрицательны.то каждое

Даны два числа х и у.Если х и у отрицательны.то каждое знач поменять его модулем ; Если отриц только 1 то оба знач прирастить на 0,5 ; если оба знач неотрицательны то оба знач уменьшить в 10 раз.Написать на qbasic

Задать свой вопрос
1 ответ
CLS
INPUT "x = ", x
INPUT "y = ", y
IF x lt; 0 AND y lt; 0 THEN
x = -x
y = -y
ELSE
    IF x lt; 0 XOR y lt; 0 THEN
    x = x + .5
    y = y + .5
    ELSE
    x = x - 10
    y = y - 10
    END IF
END IF
PRINT "x = "; x
PRINT "y = "; y
Геннадий
В 8 строчке так и бросить либо там for?
Чегавадзе Лидия
Эта программа испытанная, рабочая... Ничего менять не надобно.
Анастасия Бялобжеская
Ok,спасибо
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт