В паскале:Идёт k-я секунда суток. Найти который на данный момент час (в часах,

В паскале:Идёт k-я секунда суток. Определить который на данный момент час (в часах, минутках и секундах). К примеру, если k=13257=3*3600+40*60+57, то часов - 3, минут - 40, секунд - 57.

Задать свой вопрос
1 ответ
Var k,h,m,s:integer;
begin
write('Введите число секунд: ');
readln(k);
h:=k div 3600;
k:=k mod 3600;
m:=k div 60;
s:=k mod 60;
writeln('Часов: ',h);
writeln('Минут: ',m);
writeln('Секунд: ',s);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт