С начала суток прошло N секунд (N — целое). Найти количество полных часов, прошедших с начала суток.

@Lady_vamp · Регистрация: 10.04.2010

Kodzaev · 16.01.2013, 18:50

Pascal

Var
  n: Longint;
BEGIN
Write('Введите кол-во секунд: ');
Readln(n);
Writeln('С начала суток прошло ',Trunc(n/3600),' полных часов');
END.

@Lady_vamp 0 / 0 / 0 Регистрация: 10.04.2010 Сообщений: 36
		1
	С начала суток прошло N секунд (N — целое). Найти количество полных часов, прошедших с начала суток. 16.01.2013, 18:20. Показов 27229. Ответов 1 Метки нет (Все метки) С начала суток прошло N секунд (N — целое). Найти количество полных часов, прошедших с начала суток. 0

Опции темы

Решение