Ввести 2 целых числа и вывести на экран разность и частное этих чисел

На PascalABC: program n_1;var a,b,c,d:integer;      e,f:real;beginread(a);read(b);c:=b-a;d:=a-b;e:=b/a;f:=a/b;writeln('разность первого и второго числа=', d);writeln('разность второго и первого числа=', c);writeln('частное первого и второго числа=', e);writeln('частное второго и первого числа=', f);end. ЗЫ:скриншот работоспособности программы