Програма паскаль abc задайте 2 числа найдите их сумму и произведение . увеличте сумму на 3 произведение на 1 результат выведите на экран

Program;
var a,b,x,y:integer;
begin
readln(a);
readln(b);
x:=a+b;
y:=a*b;
writeln('Сумма =',x+3);
writeln('Произведение =', y+1);
end.
Попробуй так, если не получится, поменяю