Одна страница книги прочитывается по Н мин, в книге S страниц. За Как узнать сколько часов книга будет прочитана?Программа на Паскале нужна

program my1 ;var S,H,T,M: real ;beginwriteln('Введите за сколько прочитывается одна страница (в мин)') ;readln(H) ;writeln('Введите сколько страниц в книге') ;readln(S) ;M:=H/60 ;T:=M*S ;write('За это время будет прочитана книга '  ,T ,'ч') ;end.