написать задачу вычислите минимальное из 3-х чисел, составить блок схемучисла любые, !

Помогите написать задачу)) вычислите минимальное из 3-х чисел,составить блок схему)числа любые,пожалуйста!)

  • program tri_chisla;

    var a,b,c:integer;

    begin

    writeln ('Vvedit tri chisla a,b,c');

    readln (a,b,c);

    If (a<b) and (a<c) then

    writeln ('Naymenshim chislom e - ',a)  

    else begin   If (b<a) and (b<c) then

    writeln ('Naymenshim chislom e - ',b) 

    else begin   If (c<b) and (c<a) then

    writeln ('Naymenshim chislom e - ',c) end; end; 

            //Я немного не понял какую именно блок схему тебе нужно.

    readln

    end.

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     


See also: