Дана программа на языке паскаль: program a2; var a, b, с, min: real; begin writeln ('введите три числа'); readln (a, b, с); min : = а; if b if c writeln ('min=', min) end. составить блок схему!

Program a2;
var a, b, c, min: real;
begin
 writeln ('Введите три числа');
 readln (a, b, c);
 min:= a;
 if b<min then min:=b;
 if c<min then min:=c;
 writeln('min=', min);
end. 

Решение во вложении.