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.