На 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.
ЗЫ:скриншот работоспособности программы