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

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

var c, a,b: integer;beginWriteln ('Введите 1 ое число');readln(a); Writeln ('Введите 2 ое число');readln(b); IF (a*b)<0 thenc:=(A*B)*2elsec:=(a*B)*1.5;writeln(c);end;

Вроде так