Задача на программирования: Ввести 2 числа, если их произведение отприцательное, умножить на - 2, в противном случае умножить на 2

Question

Информатика

Альберта

12 сентября, 21:05

Задача на программирования: Ввести 2 числа, если их произведение отприцательное, умножить на - 2, в противном случае умножить на 2

+4

Ответы (1)

Знаешь ответ?

Правдина · Answer 1

Var

a, b, c:integer;

begin

writeln ("Введите 2 числа, которые будете умножать: ");

readln (a);

readln (b);

c:=a*b;

if (c<0) then

c:=c * (-2);

else

c:=c*2;

writeln ("Ответ: ", c);

end.