Ввести 2 числа. Если их произведение отрицательно, умножить его ** 2 и вывести ** экран,...

Question

Ввести 2 числа. Если их произведение отрицательно, умножить его на 2 и вывести на экран, в противном случае увеличить его в 1,5 раза и вывести на экран.

Answer 1

на каком языке програмирования?

Answer 2

var c, a,b: integer;

begin
Writeln ('Введите 1 ое число');
readln(a);
Writeln ('Введите 2 ое число');
readln(b);
IF (a*b)<0 then<br>c:=(A*B)*2
else
c:=(a*B)*1.5;
writeln(c);
end;

 

Вроде так