ИНФОРМАТИКА 9 классПомогите пожалуйста. Данный набросок надобно написать на языке Паскаля.

var a, b, c, d: integer;

begin

   write('Введите A: ');

   readln(a);

   write('Введите B: ');

   readln(b);

   write('Введите C: ');

   readln(c);

   if a gt; b then

       d:=a

   else

       d:=b;

   if c gt; d then

       d:=c;

   writeln('Величайшее число: ', d);

end.