Pascal. 40 баллов (не вру).Задание: На вход подаются два числа: a

Pascal. 40 баллов (не вру).
Задание: На вход подаются два числа: a и b. Вывести наивеличайшее из их, а затем решить 5*min 156.

Я написала:
program qq;
var a, b, min: integer;
begin
readln (a,b);
min:=a;
if (agt;b) then
min:=b;
writeln(min);
end;
var a, b, min: integer
begin
writeln (a)
readln (a)
writeln (b)
readln (b)
writeln (min)
readln (min)
writeln ('5*min 156'; '5*min 156')
end.

Не особо шарю, помогите. Что не так, и как верно сделать? Молююю!