Составить программу и блок-схему для задачи:

введите числа A B N если оба числа > N, то напечатайте слово "больше"
если < N то слово "меньше", иначе напечатайте N "в промежутке между А и В"

 program se;uses crt;vara,b,n:integer;beginwriteln('Введите число А: ');read(a);writeln('Введите число В: ');read(b);writeln('Введите число N: ');read(n);if (a > n) and (b > n) then writeln('Больше')elseif (a<n) and (b<n) then writeln('Меньше')elsewriteln('В промежутке между А и В');end.Блок схему сейчас не могу нарисовать, да и она простейшая.