Помогите информатику.
Ввести 2 числа ,найти их сумму и произведение ,если произведение окажется положительным ,то выдать его на экран,а иначе выдать на экран сумму.
Ввести 2 числа ,найти их сумму и произведение ,если произведение окажется положительным ,то выдать его на экран,а иначе выдать на экран сумму.
Answers & Comments
a,b:integer;
begin
readln(a,b);
a:=a*b;
if a>0 then
writeln(a)
else
writeln(a+b)
end.