Синформатикой, нужно нарисуйте блок-схему для решения следующей : может ли бревно с радиусом r пролезть в прямоугольное отверстие с размерами а и в? нарисуйте блок-схему для нахождения наименьшего из трех заданных чисел.

Var A,B:integer; R,min:real;
beginR:=random(100)+1;A:=random(100)+1;B:=random(100)+1;min:= R;if (R < A) and (R < B) then write('Бревно R = ',R,' пройдет в окно A = ', A,' B =', B)elsewrite('Бревно  R = ',R,' не пройдет в окно A = ', A,' B =', B);end.