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