Question

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

Answer 1

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

Answer 2

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