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

program zz1;

var a, b:integer; / /задаем переменные целого типа

begin

write (' введите первое заданное число '); / / вводим с клавиатуры первое число

read (a);

write (' введите второе заданное число '); / / вводим с клавиатуры второе число

read (b);

writeln (' разность двух чисел = ', a - b); / / выводим первый полученный ответ

write (' частное двух чисел = ', a / b); / / выводим второй полученный ответ

end.