Question

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

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

Answer 1

 program se;
uses crt;
var
a,b,n:integer;
begin

writeln('Введите число А: ');
read(a);
writeln('Введите число В: ');
read(b);
writeln('Введите число N: ');
read(n);

if (a > n) and (b > n) then writeln('Больше')else
if (a<n) and (b<n) then writeln('Меньше')else
writeln('В промежутке между А и В');

end.

Блок схему сейчас не могу нарисовать, да и она простейшая.