• Предмет: Информатика
  • Автор: Бананчик95
  • Вопрос задан 2 года назад

Ввести 2 числа. Если их произведение отрицательно, умножить его на 2 и вывести на экран, в противном случае увеличить его в 1,5 раза и вывести на экран.

Ответы

Ответ дал: F01
0

на каком языке програмирования?

Ответ дал: Stryder123
0

var c, a,b: integer;

begin
Writeln ('Введите 1 ое число');
readln(a);
Writeln ('Введите 2 ое число');
readln(b);
IF (a*b)<0 then
c:=(A*B)*2
else
c:=(a*B)*1.5;
writeln(c);
end;

 

Вроде так

Вас заинтересует