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

Программа на Паскале нужна

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