Сначал времени секунд сколько минут блок схема и программа pascal

Program a;
uses crt;
var n, a:integer;
begin
writeln('сколько секунд');
readln(n);
a:=n div 60;
минут');
readln;
end.