Задание 5. Составьте программу подсчета количества часов, минут
и секунд в данном числе суток. Число суток введите с клавиатуры.
и секунд в данном числе суток. Число суток введите с клавиатуры.
More Questions From This User See All
Answers & Comments
Ответ:
Неправильно считает секунды, в чём ошибка?
var
s,m,h,days: integer;
begin
writeln('Введите кол-во дней');
read(days);
s:=86400;
m:=s div 60;
h:=m div 60;
for var i:=1 to days do
s:=s*days;
m:=m*days;
h:=h*days;
writeln(s,' — секунд в ',days,' днях');
writeln(m,' — минут в ',days,' днях');
writeln(h,' — часов в ',days,' днях');
end.
Объяснение: