Составить программу которое вводит с клавиатуры 2 числа и выводит их сумму,разность,произведение и частное

Pascal ABCVar A,B:integer;BeginWrite('A = ');Read(A);Write('B = ');Read(B);WriteLn(A,' + ',B,' = ',A+B);WriteLn(A,' - ',B,' = ',A-B);WriteLn(A,' * ',B,' = ',A*B);WriteLn(A,' : ',B,' = ',A/B);End.