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

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

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

var
a,b,c:integer;

begin
     writeln('Vedite chislo');
     readln(a);
     writeln('Vedite chislo');
     readln(b);
     writeln('Vedite chislo');
     readln(c);
     if(a>b)then
        if(a>c)then
         writeln('Pervoe chislo bolshe', a)
        else
         writeln('trete chislo bolshe ', c)
     else
        if(b>c)then
        writeln('vtoroe chislo bolshe ', b)
     else
        writeln('trete chislo bolshe ', c);
     readln();
end. 

Вывод косоли:

Vedite chislo
1
Vedite chislo
20
Vedite chislo
1
vtoroe chislo bolshe 20