составьте программу имитирующуюю работу калькулятора, где 1 сумма двух чисел, 2 рпзность двух чисел, 3 произведение двух чисел, иначе введен неизвестный номер операции

program Pascal;var a,b:integer;beginwriteln('Введите два числа : ');readln(a,b);writeln('Сумма этих чисел равна ',a+b,'  ');writeln('Произведение этих чисел равно ',a*b,'  ');writeln('Разность этих чисел равна ',a-b,' ');end.