Напишите программу которая запрашивает значения двух переменных и выводит их разность. Приглашение к вводу каждого числа произведите в отдельных строках. Вывод результата сопроводите пояснениями.

Uses crt;
var a,b:integer;
begin
writeln(введите первое число);
readln(a);
writeln(введите второе число);
readln(b);
if a>b then writeln(a-b, первое число больше второго);
if aif a=b then writeln(0  оба числа равны);
end.