Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

Даны 3 числа найди их сумму произведения и выяснить что больше сумма или произведение

Ответ оставил Гость

Var a,b,s,p:integer;
begin
write(a=);
readln(a);
write(b=);
readln(b);
s:=a+b;
p:=a*b;
if s>p then
writeln(Сумма больше произведения);
if p>s then
writeln(Произведение больше суммы);
end.
На языке Паскаль.