Ввести 2 числа. Если их произведение отрицательно, умножить его на 2 и вывести на экран, в противном случае увеличить его в 1,5 раза и вывести на экран.
Ввести 2 числа. Если их произведение отрицательно, умножить его на 2 и вывести на экран, в противном случае увеличить его в 1,5 раза и вывести на экран.
Ответ(ы) на вопрос:
var a,b: real; begin readln(a,b); if a*b<0 then writeln(a*b*2) else writeln(a*b*1.5); end.
Не нашли ответ?
Похожие вопросы