Идет к я секунда суток разработайте программу

а так я понял,вводишь например 900 секунд, и должно вывести 15 минут?
с арифметикой,а какой там оператор?

Регистрация: 02.03.2008
Сообщений: 2,537

А если ввести k=86399 секунд ?
Распиши подробно все вычисления , все арифметические действия.
А операторы найдутся.

PS Кстати, сказано » идет k секунда» . Значит прошло k-1 секунд.

Последний раз редактировалось type_Oleg; 15.01.2014 в 22:08 .
Регистрация: 17.11.2010
Сообщений: 19,042
n — кол-во сек
n div 3600 — часов
(n mod 3600) div 60 — минут
n mod 60 — секунд

Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию

Пользователь
Регистрация: 29.05.2010
Сообщений: 33

Примерно так или не верно?

Program Time;
var
s,m,h,h1: Longint;
begin
Write(‘Введите количество секунд: ‘);
readln(s);
h:= s div 3600 ;
m:=60;
h1:= h*m ;
Writeln(‘Часов =’, h);

СДЕЛАЛИ ДОМА за 10$ 100$ и 1000$

Writeln(‘Минут =’, h1);
end.

Регистрация: 02.03.2008
Сообщений: 2,537
Идет k-я секунда суток. Вывести на экран количество полных часов и минут, прошедших от начала суток.

Например, идет 4206-я секунда. То есть прошло 4205 секунд.

Какой ответ правильный:
— прошел 1 полный час и 10 полных минут, или
— прешел 1 полный час , или 70 полных минут ?
Если 1-й ответ правильный, то

Program Time; var k,m,h: Longint; begin Write(‘sec= ‘); readln(k); k:=k-1; h:= k div 3600 ; m:=(k-3600*h)div 60; Writeln(‘hour =’, h,’ min =’, m); end.
Если второй, то заменить одну строку:
m:=k div 60;

Источник: www.programmersforum.ru

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

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.