написать программу на паскале: Для целого двузначного числа X найти разность и произведение его цифр.
и Сделать блок схему или алгоритм
Помогите пожалуйста

лучший

beginvar a:=ReadInteger('Введите двузначное число :');var b:=a mod 10 ; var c:= a div 10;Writeln('Разность =',c-b);Writeln('Произведение  =',c*b);end.