Question

Вводятся 3 числа вывести среднее по значению число в Средние число меньше 1 но больше другого для решения необходимо составить блок-схему для обозначения чисел Используйте латинские переменные

Answer 1

Var
    g: real;
    i: integer;
    f: boolean;

begin
    writeln('Введите данные');
    for i := 1 to 3 do 
    begin
        readln(g);
        f := f or (g = 9.8)
    end;
    writeln(f);
end.

Answer 2

Для решения данной задачи необходимо следовать следующим шагам:

1. Ввести 3 числа, обозначим их как a, b и c. 2. Найти среднее число из трех введенных. Для этого можно использовать условную конструкцию. 3. Выполнить проверку: если среднее число меньше 1 и больше другого числа, то оно будет искомым числом. 4. Вывести найденное число.

Ниже представлена блок-схема для данной задачи:

     +-------+
---->| Ввод  |
 a   | чисел |
     +-------+
 \
  \   
   \
    +---+        
    |   |        
----| a |---+\     
    |   |    |                  
     +---+   |              
  \           /                     
   >  +---+  <                                
  /   |   |   \              
----| b |----|--> Расчет среднего числа               
  \   |   |   /              
   >  +---+  <                                
  /           \                           
 /                          
 +---+                     
 |   |                       
-| c |                      
 |   |                               
 +---+                                              
   |                                    
    |                            
   \|/                 
   +---+   
---|   |---+
   |   |    
    +---+   
    <  1   -   Нет   \
       |              \
       |               \
      Да               Нет
       |               |
       |               |
       V               V
   +-------+        +-------+
-->| Вывод |<----|  Вывод  |
   +-------+        +-------+

Надеюсь, данная информация будет полезной! Если у вас возникнут дополнительные вопросы, не стесняйтесь задавать их.