Вопрос по информатике:
Помогите решить в Паскаль:
Дано время: часы, минуты, секунды. Определите время через 10 секунд.
Начало, думаю, такое. А обратно в часы и минуты перевести не могу. Выдает ошибку
program upr3;
var h,m,s,c,i:real;
begin
readln (h,m,s);
i:= h*3600+m*60+s;
c:= i+10;
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 09.09.2016 06:52
- Информатика
- remove_red_eye 3631
- thumb_up 6
Ответы и объяснения 1
Var
h, m, s, i: integer;
begin
readln(h, m, s);
i := h * 3600 + m * 60 + s + 10;
h := i div 3600;
m := i mod 3600 div 60;
s := i mod 60;
writeln(h, ' ', m, ' ', s);
end.
- 01.01.1970 00:00
- thumb_up 37
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.