Программа преобразует время введенное в секундах в минуты и в часы. Например, 60 секунд это 0.017 часа или 1 минута.
Решение:
|
1
2 3 4 5 6 7 8 9 10 |
program line_13;
uses crt; var s, m: real; begin clrscr; write(‘Секунды > ‘); readln(s); m:=s/60; write(s:4:0,‘ сек. = ‘, m/60:4:3, ‘ ч. или ‘, m:4:2, ‘ мин.’); readkey; end. |