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

Прости, только введи там три переменных, поторопился, ввел две.

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