Напишите программу пожалуйста!!! Информатика 8 класс!
Введсти 2 числа.Если их произведение отрицательно, то умножит его на -2 и вывести на экран. В противном случае увеличить его в 1,5 раза и вывести на экран.

Вот программа, сделанная на Паскале.

program qq;

var a, b, c: real;

begin

Writeln(‘Введите 2 числа’);

Readln(a,b);

if (a*b)<0 then c:=(a*b)*(-2)

else

c:=(a*b)*1.5;

Writeln(‘Получилось число:’, c);

end.