Люди, кто шарит в программировании

Выдаёт ошибку "встречено еlse, а ожидался оператор"
Удалять ; побывала, пишет ошибку "встречено else, а ожидалось ;"

program pr1;
var a, m, n: real;
begin
writeln ('Введите количество минут трека m=');
read (m);
m:=m*60;
writeln('Введите количество секунд трека n=');
read (n);
n:=16*n;
m:=16*m;
if n>60 then writeln('ошибка') else
if m+n>6144 then a:=(m+n)- 6144; writeln (' не хватает', a , 'килобайт')
else writeln (' композиция поместиться');
end.​