Вывести на экран наибольшее из трех чисел

Формулировка. Даны три числа. Вывести на экран то из них, которое больше.

Решение. Даная задача обобщает предыдущую. В ее решении также нужно использовать условный оператор if, однако в данном случае для нахождения максимального числа нам нужно выполнить минимум два сравнения. Сам механизм выбора в виде условного оператора с вложенными в него двумя другими условными операторами можно легко пояснить следующей блок-схемой:

Несмотря на то, что выполняется всего одна инструкция вывода, при написании кода мы все ветвления будем помещать в отдельный составной оператор. Напомним: это значит, что при движении от более общего уровня к частному все конструкции нужно смещать на два пробела относительно родительского блока/оператора.

Код:

1. program MaxOfThree;
2. var
3. a, b, c: integer;
4. begin
5. readln(a, b, c);
6. if a > b then begin
7. if a > c then begin
8. writeln(a)
9. end
10. else begin
11. writeln(c)
12. end
13. end
14. else begin
15. if b > c then begin
16. writeln(b)
17. end
18. else begin
19. writeln(c)
20. end
21. end
22. end.