Question

Нужно было написать программу, которая находит наибольшее из трех чисел a, b и c. Начинающий программист написал фрагмент программы так (см. ниже) При каких наборах значений a, b, c эта программа работает неверно? if a > b then M := a else M := b; if c > b then M := c else M := b; 1)a = 1; b = 2; c = 3 2) a = 2; b = 1; c = 3 3) a = 2; b = 3; c = 1 4) a = 3; b = 1; c = 2 5) a = 3; b = 2; c = 1 6) a = 1; b = 3; c = 2 Язык паскаль

Answer 1

Работает неверно, при:

4) a = 3; b = 1; c = 2

5) a = 3; b = 2; c = 1

Проверить может сам:

Program numbers;

var a,b,M,c: real;

BEGIN

Write('a: ');

Readln(a);

Write('b: ');

Readln(b);

Write('c: ');

Readln(c);

if a > b then

M := a

else

M := b;

if c > b then

M := c

else

M := b;

Writeln(M);

END.

Answer 2

Программа, которую вы предоставили, не будет работать корректно в случае 3) a = 2; b = 3; c = 1. В этом случае программа неверно определит наибольшее число.

Давайте разберемся, как работает программа:

1. Сначала она сравнивает a и b, и если a больше b, то M присваивается значение a, иначе M присваивается значение b.

2. Затем она сравнивает c и b, и если c больше b, то M перезаписывается значением c, иначе M остается прежним значением b.

Исходя из этой логики:

• В случае 3) a = 2; b = 3; c = 1, программа сначала устанавливает M равным b (как если бы a > b было бы false), а затем перезаписывает его значением c, что делает M равным 1. Однако, наибольшим числом из трех является 3.

Поэтому программа работает неверно в случае 3). В остальных случаях она будет работать верно, так как правильно определит наибольшее число из трех.