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

Категория: Delphi/Pascal
2011-11-22 19:31:18
code: #pascal
Program Integer20;
var s,c:integer;
begin
writeln('Сколько прошло секунд с начало суток=');readln(s);
c:=(s div 60)div 60;
writeln('Число полных часов =',c)
end.

автор: Zakirov Nail a.k.a ZevsNet

Поделиться:

Похожие статьи:

теги: студенты, консольное приложение, М.Э.Абрамян