Пж ответьте на 10ое, оч необходимо пжжжжжж.

Пж ответьте на 10ое, оч нужно пжжжжжж.

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

pascal abc

var x,y:integer;

begin

readln(x,y);

if (xgt;y) and (xlt;0) and (ylt;0)then

begin

x:=x*2;

y:=y*2;

end

else begin

x:=x+2;

y:=y+2;

end;

writeln(x,y)

end.

Alla Tihonchikova
чувак в с++
Сергей Струпенев
пж
Сергей Поличенков
чувааак пж в с++
Драенков Шурик
чувак пожалуйста напиши в с++ если ты шарииишььь
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт