0 / 0 / 0
Регистрация: 17.10.2010
Сообщений: 63

Определить время между двумя событиями

10.09.2012, 18:03. Показов 2577. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Время наступления событий фиксируют в часах, минутах, секундах. Определить время между двумя событиями.
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
10.09.2012, 18:03
Ответы с готовыми решениями:

Рассчитать время между двумя событиями
Здравствуйте. Во время выполнения объявляю 2 переменных(старт и конец процесса, они в свою очередь тоже идут на лейблы). После хочу...

Определить интрвал времени между двумя событиями
Доброго времени суток! Не могу справиться с задачей: нажимаю на форме button и начинается отсчёт времени, а когда нажимаю buuton2 то...

Как определить количество прошедших минут между двумя событиями?
Программа периодически выполняет какие-нибудь измерения и если наступила новая минута, то их записывает в базу данных. В течении нескольких...

1
Почетный модератор
 Аватар для Puporev
64312 / 47609 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
10.09.2012, 18:07
Лучший ответ Сообщение было отмечено Maria_Добрая как решение

Решение

Вроде так.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
uses crt;
var h1,m1,s1,h2,m2,s2,rh,rm,rs,ps,pm:shortint;
begin
clrscr;
repeat
writeln('Введите первое время, часы минуты секунды:');
readln(h1,m1,s1);
until(h1 in [0..23])and(m1 in [0..59])and(s1 in [0..59]);
repeat
writeln('Введите второе время, часы минуты секунды:');
readln(h2,m2,s2);
until(h2 in [0..23])and(m2 in [0..59])and(s2 in [0..59]);
if s2>=s1 then
 begin
  rs:=s2-s1;
  ps:=0;
 end
else
 begin
  rs:=60+s2-s1;
  ps:=1;
 end;
if m2-ps>=m1 then
 begin
  rm:=m2-ps-m1;
  pm:=0;
 end
else
 begin
  rm:=60+m2-ps-m1;
  pm:=1;
 end;
if h2-pm>=h1 then rh:=h2-pm-h1
else rh:=24+h2-pm-h1;
write('Разница во времени=',rh,'ч. ',rm,'мин. ',rs,'сек');
readln
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
10.09.2012, 18:07
Помогаю со студенческими работами здесь

Посчитать количество дней между двумя событиями
в функции interval считаю количество дней между двумя событиями, но не правильно, в чем проблема не понимаю, помогите ...

Структура «время», определить функцию определяющую интервал между двумя значениями времени
Все функции, используемые в программах, должны иметь независимый интерфейс. Стандартные функции работы со стеком и очередью не...

Структура "Историческое событие". Найти интервал между двумя событиями в днях
Ввести структуру ИСТОРИЧЕСКОЕ СОБЫТИЕ с полями ЧИСЛО, МЕСЯЦ, ГОД, СОБЫТИЕ. Составить и протестировать функцию a) ввода исторического...

Класс «Время», вычислить разницу в секундах между двумя объектами типа «Время»
Здравствуйте. Нужно написать задачку на C++ в приложении с оконным интерфейсом. Класс «Время» имеет три поля – часы, минуты, секунды....

Класс «Время», вычислить разницу в секундах между двумя объектами типа «Время»
Здравствуйте. Нужно написать задачку на C++ в приложении с оконным интерфейсом. Класс «Время» имеет три поля – часы, минуты, секунды....


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

Новые блоги и статьи
Unity 4D
GameUnited 13.06.2025
Четырехмерное пространство. . . Звучит как что-то из научной фантастики, правда? Однако для меня, как разработчика со стажем в игровой индустрии, четвертое измерение давно перестало быть абстракцией из. . .
SSE (Server-Sent Events) в ASP.NET Core и .NET 10
UnmanagedCoder 13.06.2025
Кажется, Microsoft снова подкинула нам интересную фичу в новой версии фреймворка. Работая с превью . NET 10, я наткнулся на нативную поддержку Server-Sent Events (SSE) в ASP. NET Core Minimal APIs. Эта. . .
С днём независимости России!
Hrethgir 13.06.2025
Решил побеседовать, с утра праздничного дня, с LM о завоеваниях. То что она написала о народе, представителем которого я являюсь сам сначала возмутило меня, но дальше только смешило. Это чисто. . .
Лето вокруг.
kumehtar 13.06.2025
Лето вокруг. Наполненное бурями и ураганами событий. На фоне магии Жизни, священной и вечной, неумелой рукой человека рисуется панорама душевного непокоя. Странные серые краски проникают и. . .
Популярные LM модели ориентированы на увеличение затрат ресурсов пользователями сгенерированного кода (грязь -заслуги чистоплюев).
Hrethgir 12.06.2025
Вообще обратил внимание, что они генерируют код (впрочем так-же ориентированы разработчики чипов даже), чтобы пользователь их использующий уходил в тот или иной убыток. Это достаточно опытные модели,. . .
Топ10 библиотек C для квантовых вычислений
bytestream 12.06.2025
Квантовые вычисления - это та область, где теория встречается с практикой на границе наших знаний о физике. Пока большая часть шума вокруг квантовых компьютеров крутится вокруг языков высокого уровня. . .
Dispose и Finalize в C#
stackOverflow 12.06.2025
Работая с C# больше десяти лет, я снова и снова наблюдаю одну и ту же историю: разработчики наивно полагаются на сборщик мусора, как на волшебную палочку, которая решит все проблемы с памятью. Да,. . .
Повышаем производительность игры на Unity 6 с GPU Resident Drawer
GameUnited 11.06.2025
Недавно копался в новых фичах Unity 6 и наткнулся на GPU Resident Drawer - штуку, которая заставила меня присвистнуть от удивления. По сути, это внутренний механизм рендеринга, который автоматически. . .
Множества в Python
py-thonny 11.06.2025
В Python существует множество структур данных, но иногда я сталкиваюсь с задачами, где ни списки, ни словари не дают оптимального решения. Часто это происходит, когда мне нужно быстро проверять. . .
Работа с ccache/sccache в рамках C++
Loafer 11.06.2025
Утилиты ccache и sccache занимаются тем, что кешируют промежуточные результаты компиляции, таким образом ускоряя последующие компиляции проекта. Это означает, что если проект будет компилироваться. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru