Question

Составить блок-схему к программе program if17; var A, B, C: Real; begin Write('Введите первое число: '); Readln (A); Write('Введите второе число: '); Readln (B); Write('Введите третье число: '); Readln (C); if B=C then Writeln('1'); if A=C then Writeln('2'); if A=B then Writeln('3'); end.

Answer 1

Вот так, вроде. В принципе, да.

Answer 2

Для составления блок-схемы программы, можно использовать стандартные блоки, такие как ввод данных (в данном случае, трех чисел), условные операторы if-then и операторы вывода результатов. Вот блок-схема программы:

luaCopy code
  +-------------------+
  | Начало программы  |
  +-------------------+
            |
            V
  +-----------------------+
  | Вывести 'Введите первое |
  | число: '                |
  +-----------------------+
            |
            V
      +------------+
      | Считать A  |
      +------------+
            |
            V
  +-----------------------+
  | Вывести 'Введите второе |
  | число: '                |
  +-----------------------+
            |
            V
      +------------+
      | Считать B  |
      +------------+
            |
            V
  +-----------------------+
  | Вывести 'Введите третье |
  | число: '                |
  +-----------------------+
            |
            V
      +------------+
      | Считать C  |
      +------------+
            |
            V
  +------------------------+
  | Если B = C, то         |
  |   Вывести '1'          |
  | Если A = C, то         |
  |   Вывести '2'          |
  | Если A = B, то         |
  |   Вывести '3'          |
  +------------------------+
            |
            V
  +------------------+
  | Конец программы  |
  +------------------+

Эта блок-схема представляет вашу программу на языке Pascal, которая запрашивает у пользователя три числа, затем сравнивает их и выводит соответствующее значение в зависимости от условия.