Задача 6.2 Урок 9

Задача 6.2 Урок 9:

Пользователь вводит три числа, найдите из них максимальное.
Решите тремя способами:
С вложенными блоками (без and, все опараторы if должны быть в полной форме).

var a, b, c: integer;
begin
    a := 5;
    b := 2;
    c := 7;


    if (a > b) then
        if (a > c) then
            writeln('otvet: ', a)
        else
            writeln('otvet: ', c)


    else
         if (b > c) then
             writeln('otvet: ', b)
         else
             writeln('otvet: ', c);


    readln();
end.

КОНСОЛЬ:

otvet: 7