напишите программку которая просит юзера ввести 2 числа с клавиатуры. Если

Напишите программку которая просит юзера ввести 2 числа с клавиатуры. Если оба числа отрицательные и 1-ое число больше второго, то каждое увеличится в 2. ПОЖАЛУЙСТА ПОМОГИТЕ

Задать свой вопрос
1 ответ

program chisla;

var x1, x2 : real;

begin

Readln(x1,x2);

If (x1lt;0) and (x2lt;0) and(x1gt;x2) then x1=x1*2; x2=x2*2;

Write(x1,x2);

end

, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт