Напишите программу ввода чисел а,b с клавиатуры.Если a=b,то вывести на экран сумму a и b,иначе вывести на экран b-a (используя Функцию)Паскаль

Предыдущий
вопрос Следующий
вопрос

program SumOrSubtraction;

var
a, b: integer;

function Calculate(a, b: integer): integer;
begin
if a = b then
Calculate := a + b
else
Calculate := b - a;
end;

begin
writeln('Enter a:');
readln(a);
writeln('Enter b:');
readln(b);

writeln('Result: ', Calculate(a, b));
end.