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

Даны два числа. Если они положительные, то отыскать их сумму. Если они отрицательные, то их произведение, если они имеют различные знаки, то отыскать сумму тройного первого числа с двойным вторым.

Задать свой вопрос
Василий
на каком языке то?
1 ответ
//Pascal
var a, b: integer;
begin
write('Введите два числа: '); readln(a, b);
if ((a lt; 0) and (b lt; 0)) then
  writeln(a * b)
else
if ((a gt; 0) and (b gt; 0)) then
  writeln(a + b)
else
  writeln(a*3 + b*2);
end. 
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт