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