Помогите , пожалуйста . Необходимо написать программу для Паскаль.Ввести 5 чисел

Помогите , пожалуйста . Нужно написать программку для Паскаль.

Ввести пять чисел и отыскать наивеличайшее из них.
Я здесь написал кое-что ,но не знаю верно ли :(
HELP ME.

program ru;
var a,b,c,d,e,max:integer;
begin
writln('Введите пять целых чисел');
if agt;b then
begin
max:=a;
end
else begin
max:=b;
end;
if maxgt;c then
begin
max:=max;
else begin
max:=c;
end;
if dgt;e then begin
max:=d;
end
else begin
max:=e;
end.