Составьте, пожалуйста, программу для Паскаль на нахождение суммы,произведения и среднего арифметического двух или трех чисел. Буду очень вам благодарна!

var a,b:integer;beginreadln(a,b);writeln('Сумма чисел = ',a+b);writeln('Произведение чисел = ',a*b);writeln('Среднее арифметическое = ',(a+b)/2);end.Пример:2576Сумма чисел = 101Произведение чисел = 1900Среднее арифметическое = 50.5