Даны два числа. Если они положительные, то найти их сумму. Если они отрицательные, то их произведение, если они имеют разные знаки, то найти сумму утроенного первого числа с удвоенным вторым.
на каком языке то?
//Pascal var a, b: integer; begin write('Введите два числа: '); readln(a, b); if ((a < 0) and (b < 0)) then writeln(a * b) else if ((a > 0) and (b > 0)) then writeln(a + b) else writeln(a*3 + b*2); end.