Предмет: Информатика,
автор: ismailova1997
Ввести 2 числа. Если их произведение отрицательно, умножить его на 2 и вывести на экран, в противном случае увеличить его в 1,5 раза и вывести на экран.
Ответы
Автор ответа:
0
var a,b: real;
begin
readln(a,b);
if a*b<0 then writeln(a*b*2) else writeln(a*b*1.5);
end.
Интересные вопросы
Предмет: Қазақ тiлi,
автор: hapheylemon
Предмет: Қазақ тiлi,
автор: kimratmir
Предмет: Математика,
автор: sabinacafar09
Предмет: Математика,
автор: lapeli
Предмет: История,
автор: Мария16