Даны 2 числа. Сумма чисел увеличить в 3 раза, а разность уменьшить на 500. Помогите пожалуйста!
var
a, b : integer;
begin
write('ввести a ');
readln(a);
write('ввести b ');
readln(b);
writeln('(a+b)*3=(', a,'+', b, ')*3=', (a+b)*3);
writeln('(a-b)-500=(', a, '-', b, ')-500=', (a-b)-500);
end.
Спасибо большое!